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-TITLE CVMJABO MSV11-J MEMORY DIAG. 
-NLIST TOC 


IDENTIFICATION 
PRODUCT CODE: AC-U1356-MC 
PRODUCT NAME: CVMJABO MSV11-J MEMORY DIAGNOSTIC 
PRODUCT DATE: OCTOBER 1985 
MAINTAINER: E.S.0. METHODS 


The information in this document is subject to change 
without notice and should not be construed as a commitment 
by Digitel Equipment Corporation. Digital Equipment 
Corporation assumes no responsib: lity for any errors that 
may appear in this manual. 


The software described in this document is furnished to the 
purchaser under a license for use on a single computer 
system and can be copied (with inclusion of Digital's 
copyright notice) only for use in such system, except as may 
otherwise be provided in writing by Digital. 

Digital Equipment Corporation assumes no responsibility for 
the use or any 4 of its software on equipment that is 
not supplied by Digital. 


COPYRIGHT (C) 1985 Digital Equipment Corporation 
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OPERATIONAL SWITCH SETTINGS 
SWITCH REGISTER DEFINITIONS 


AT 
LIMIT MAX ERRORS PER BANK 
FAT TERMINAL (1352 COLUMNS OR BETTER) 
TEST MODE - SEE DOCUMENT 
4 MODE - SEE DOCUMENT 


TEST MODE - SEE DOCUMENT 
DETECT SINGLE BIT ERRORS 


* 

SWITCH USE 

°- ge@6e6e  j- ee @Geeeeneeseeeccons 

e 15 HALT ON ERR 

* 14 LOOP ON TEST 

a 13 INHIBIT ERROR = 
* 12 INHIBIT RELOCAT 

« il QUICK VERIFY 

» 10 BELL ON ERROR 

Ey LOOP ERROR 

® HALT AM CUNRELOCATED RESTORE LOADERS) 
* DETAILED ERROR 

a INHIBIT CONFIGURATION 
* 

de 

* 

& 

* 

2 
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SEQ 0003 
66 
6? TABLE OF CONTENTS 
4 1.0 GENERAL PROGRAM INFORMATION 
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7 1.3 Related ee And Standards 
34 1.4 Diegnostic Hierarchy Prerequisites 
Le 1.5 Assumptions 
r 2.0 OPERATING INSTRUCTIONS 
7 2.1 ogetce ne and  Seaetice Procedures 
80 2.2 ae t Sequence 
Bs $°3 gpestel Environments 
‘ rogram ions 
+ 2.5 Execution Times 
+ 3.0 ERROR INFORMATION 
+H 3.1 Error R rti 
: 3.2 Error reviations 
4 3.3 Error Halts 
33 4.0 PROGRESS REPORTS 
4 5.0 CSR INFORMATION TABLES 
+ 5.2 MSV11i-L/P CSR 
38 6.0 SUB-TEST SUMMARIES 
100 6.1 Tests 
0g 6.2 Patterns 
82 7.0 PROGRAM FEATURES 
05 7.1 Fast Deta Access Rates 
198 7.2 Bank Zero Testi 
10 7.3 Memory Configuration Map 
+98 7.4 Everything You’ ve Always Wanted To Know About SUPERMAC ... 
10 7.5 Memory Management Mapping 
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1.0 GENERAL PROGRAM INFORMATION 


1.1 Progrem Purpose (Abstract) 


a. pnenae for use on all PDP-11/23/238/73's which meet the conditions 
in 1.2.1. 


. This progrem will be used by system managers and operators to 
determine the correct operation of main memory and also it will 
be primarily used by field service and manufacturing to isolate 
feilures to the memory and to isolate failures within the memory 
to the correct card. 


c. The object of this software is to functionally test and verify 
ell main memory functions as fast as possible. 


d. There is the capability of testi mixed configurations (CMSV11-L, 
and MSV11-P) on the eyatse. ™ ” 


. It has e@ special maintenance mode (Field Service Mode) to provide 
specific functional capabilities. 


pet pee pe ee pe 
Oe~AIAVUSWUPDE 


Pure 
Sv 


viewer 
® 


1.2 System Requirements 


a ar a a et tt tO Oh OO OO 


at 1.2.1 WHerdware Requirements - 

142 POP -11/23/238/44/83/84 CPU with 18/22 bit addressing and at 
r+ least 64K (16 Bit Words) of Memory and Memory Management. 
145 

+45 eeeeee NOTE s00200 

138 1. Like oeere types must be on 16K word boundaries 

+33 starting a phyelcal address 0. 

i 2. REFERENCE KTJ11 document for proper configuration 

+33 fmunnnsouis  ° re 
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SEQ 0005 
# 
| : : 1.2.2 Software Requirements - 
| 138 This program is designed to run stand alone or under any of the 
1 following monitors: 
| te XxxP 
a 
ise ACT 
6 APT 


6 1.3 Related Documents And Standards 


, 1. Microcomputers and Memories (EB-20912-20) 
1 2. PDP-11/23 User's Guide 
74 3. 
75 
i . 
5S. MSV11-P Technicel Manuel 


1.4 Diagnostic Hierarchy Prerequisites 

If the program in any way misbehaves, then: 

Try it again with Cache off (reference Section 2.4.3.1) 
Inhibit relocation (reference section 2.4.1) 

Try CPU Diagnostics 

Try Memory Management Diagnostics 

Try Cache Diagnostics (where applicable) 

Try QBUS Map Diagnostics (where applicable) 


ouwest ww NH 


AOA 
y drt heb tet pet trp tet chet 


| 
MSV11-J Users guide 
MSV11-L Users Guide 
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1.5 Assumptions 
This essumes the correct operation of the CPU, Memory 


Henagenent. Ceche, end the QBUS Map. This yg es occupies 
Cinitielly) Bank O (0-16K). The XXDP+ loaders are in 3. 


Senses 


2.0 OPERATING INSTRUCTIONS 
2.1 Loading Sterting Procedures 
2.1.1 Quick Starting - 


1. Load address 200 
2. Set switch register for options (normally 0) 
3. Start 


NOTE 
BE SURE that the peripheral page jumper (where applicable) 


is in plece; feilure to do so sends the diagnostic to 
Never-Never Land. 


2.1.2 Stopping - 
1. Set SW8, and/or 
2. Type control "C” (Reference section 2.4.4.1). 


SIRGSEN-SSaVateunr owe waUaune 


2.1.3 Restarting (Preserve Configuration Table) - 
1. Load address 202 
2. Set switch register for options (Normally 0) 
3. Start 


SeSeeeeen 
2 
VaUbrcwo 


— _ 


-_-————— 





CVMJABO MSV11-J MEMORY DIAG. MACRO YOS.02 Monday 07-Oct-85 16:57 Page 9 


i 


| 


| 


' 


Giasseseueason 


YVabuUnNreo 


perp pb 
aQrxnUes 


2.1.4 Switch Register Options - 


SOPNWUSUATSBOOr 


ERROR TYPEOUTS 





ON ERROR 
HALT PROGRAM CUNRELOCATE RESTORE LOADERS) 
TAILED ERROR REPORTS 
INHIBIT CONFIGURATION MAP 
LIMIT MAX ERRORS PER BANK 
FAT TERMINAL (132 COLUMNS OR BETTER) 
TEST MODE - SEE DOCUMENT 
TEST MODE - 


TEST MODE - SEE DOCUMENT 
DETECT SINGLE BIT ERRORS 


SEQ 0007 


ce ee eee 
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2.2 Default Test Sequence 


268 
The following two lists give the test protocol for parity and ECC 


nemery, Tests marked with a “*" are not normally run except under ACT 
-. : ts or through ea Field Service Command (Reference Section 


2.2.1 Test Protocol For MSV11-L/P Parity Memory - 


TESTIS ST ESTP EE SEL. 


Test Test Name Time (sec/16K) 
34 Soft Error Test <1 
6 Initial Date Test <1 
17 Holding 1's and 0's Test <1 
7 Address Bit Test <1 
1 Address Test <1 
2 Complement Address Test <1 
3 3 XOR 9 Test 1 
4 Rotating O's Test 1 
- Rotating 1's Test i 
310 21 Marching 1's and 0's Test 1 
311 35 Worst Case Noise Parity Test n/a 
st¢ * 22 Refresh Test 10 
3} * 23 sat Di el Test 10 
14 26 Random Vata fest <1 
315 * 24 Fast Galloping Pattern Test 20 
338 * 31 Sob-a-long Test 3 
1 * 32 Write Recovery Test <1 
338 « 33 ranch Gobble Test 35 
9 34 Soft Error Test <1 


gate 
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At the end of each Pass the program will run cleanup Patterns 
30, and 427 for all banks. 


SEQ 0009 
325 
326 
327 
328 
: 2.2.2 Test Protocol for MSV11-J ECC Memeory 
s3i Pattern Pattern Name Time (sec/16K) 
335 5 Rotating 1's Test 1 
22} Bq Soft Error Test <1 
335 6 Initiel Date Test <1 
336 44 Shifting check bits thru the CSR 5 
337 14 Basic Double Bit Error test <1 
38 45 Syndromes in CSR on DBE test <1 
339 36 Correction code tes 1 
20 Syndromes in CSR on SBE test 1 
341 37 ECC Disable Test <1 
a 41 Address to CSR on DBE test 1 
ae Extended address to CSR test <1 
Tae 43 Byte write test <1 
345 46 Check SBE with ECC Diseble test <1 
ae 47 No CSR update on SBE with DBE test <1 
34 10 Byte Address <1 
3468 17 Holding 1's and O's Test <1 
349 Bit Tes <1 
sae 1 Address Test <1 
3 2 Complement Address Test <1 
3 4 Rotating O's Tes 1 
Ss Rotating i‘s Test 1 
21 ing O's and 1's Test 1 
5 * 22 Refresh Tes 10 
3 Random Date Tes <1 
as, « 24 Fast Galloping Pattern Test 20 
* 31 -a-long Tes 3 
359 A Write Recovery Test <1 
ase « 33 Branch Gobble Test 35 
362 Soft Error Test <i 
364 
365 
367 
368 


; Test 
7 Address o t 
Test 
March 0 
Test 
26 t 
Sob Test 
32 
34 
@ - Run only on the first Pass when under ACT or APT 
| 
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2.3 Speciel Environments 
2.3.1 XxXDP+ 


The first pass will be a quick verify pass if and only if it is in 
chain mode. 


The program will not create double bit errors (DBE's) after the ist 


pess. 
2.3.2.1 APT Execution Times - 


Here are some measured execution times for an 11/238 under APT 
ist QV Pass 2nd Pass onward 


1024K MSV11-J 30 min 30 min 
256K MSV11-L 20 min 20 min 
128K MSV11-P 20 min 20 min 


The first pass will be a quick verify pess 


NOTE 


Even though the first pass is ea QV pass 
it tekes 1 r than the subsequent 
non-QV passes to the fact that it is 
running more patterns, some of which 
(patterns 624 and #535 for exemple) can 
be extrememly time consuming. 


SEQ 0010 
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425 
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tt 





2.3.2.2 APT Environment Table - 


The following teble gives some of the stendard settings : 
E-Teble. They may be modified as noted es the user sees fit. 


should be set according to emount and type of 
The ec 


memory to tested. sbove table (APT Execution Times) gives some 
times. For eny petterns deleted (through use of Device 
Descriptor Words) reference section 2.2 for individual pattern times. 


NOTE 


The times given in section 2.2 ere for 
16K chunke of memory. not 128K boards! 


LONGEST TEST TIME: 

This peremeter should be set to the execution time of the longes 
gaeere ai“ run. for the default case this is 35 seconds fo 
attern 


t 
r 


ADDITIONAL RUN TIME: 
Not Used By Program. 


SOFTWARE ENVIRONMENT : 
For APT euteo mode this peremeter should be set to a “i”. For 
dump mode set this to eae “0”. 


ENV MODE : 

_ _ When this emeter is set to ea "0" the program does it's own 
Sizing. If users sets bit @7 however, he must specify the types 
and emounts of memory to be tested. 

SWITCH 1: 


The default setting of this switch is "105". APT uses this as 
the switch register for the program. Reference section 2.4.1 for more 
information on switch settings. 


SWITCH 2: 

Thies switch, if set te any non-zero number, is used to limit the 
amount of pesses APT will make. The progrem will hang efter this 
count hes been reached. 


CPU OPTIONS: 
Not Used By Program. 


Y TYPE n (n=l to 4) 

If bit 67 of ENVIRONMENT MODE is set these four words ere used to 
log the different types of memory to be tested. If bit #7 is not set 
these locetion ere not used. 

MAXIMUM ADDRESS n (n=l to 4) 


These four words are used in conjuntion with the corresponding 


ee 
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MEMORY TYPE words to indicate the highest eddress thet memory type 
occupies. 


NOTE 


ee i Ce Cees Co ae ectuelly 
heve —_o en eccurete 
ctawaiton memory . All the 
progres looks for is en eccurate telly 
of memory emount! 


INTERRUPT VECTOR n (n=1 to 2) 
Not Used By Progren. 


BUS PRIORITY n (n=1 to 2) 
Not Used By Progren. 


BASE ADDRESS: 
Not Used By Program. 


DEVICE MAP: 
Not Vsed By Progrea. 


oo IPTOR CODE n (n*1 to 2) 
Not Used By Progren. 


DEVICE ye CODES: 
The 







P : am to determine 
which pet 1 words ere on 
“1""e, indicating thet ell ‘of the petterns shown in section 2.2 


pro Bigs table - “is aekarae ee follows: ; Each set of words 
00 WORDS PROGRAM TABLE (Symbolic location) 

Worde 0-1 MKCSRT 

Words 2-3 MKPAT 

Words 4-5 MJPAT 


Bit #0 set in the first es * indicates thet the first pattern § in eho 
teble will be executed, bit #1 the second, bit #2 the third,... bit 
0 of the second word indicates that the 17th entry in the teble will 
be Susouied. and so on. 


SEQ 0012 
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2.3.3 No SBE Free Berks - 


If the program cannot find eny SBE (Single Bit Error) free locetions 
Cin non-protected ) it will print out en error message end 
cont ¢c 


2.3.4 Mixed Perity ECC Configurations - 


The progres will function normally in mixed environments. The 
sequence of testing may seem strange due to the recursive test aode 
elgorithm (reference sections 2.4.1.1, 2.4.1.2. 2 : 


CVMJABO MSV11-J MEMORY DIAG. 
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2.4 Progrem Options 


2.4.1 Switch Register Details - 


If e hardware switch register is not available then the software 
switch ister is in location 176. IF under APT if BIT? is set in 
the E-TABLE symbolic location “SENVM"” the APT software switch register 
will be used (location $SWREG). 


To change the software switch register contents: yes “control G". 
This will cause display the current value of the and prompt for 
the octal input of the new SWR value from the terminal. This routine 
will ignore you (not respond to control "G") if you have a hardware 
switch register. 


swis = HALT ON ERROR 
(100000) 
Continuing from this halt will first check for a ohenge 


in the software switch ti gee ("Control G" in the T 
input buffer) then it will continue testing. 


SW1i4 = LOOP ON TEST 
(40000) 
This will cause looping on the present test or pottern 
(back to lest scope trap). f in a pattern then the 
looping will be for an entire bank of 16K addresses. 
SwWi3 = INHIBIT ERROR TYPEOQUTS 
(20000 ) 
This will cause returns from the error routine without 
the typed messages. Other on error functions are not 
affected. 
SWie2 = INHIBIT RELOCATION 
€ 10000) 
This prevents the program from moving and consequent] 
prevents the program from testing at least 32K o 
memory. 
SWil = QUICK VERIFY 
€4000) 


If this switch is selected roximately one 64th of 
the possible combinations of E's DBE's ere tested. 


Each pass complete typeout will indicate this mode by 
preceding the pass number with “QV". 


SEQ 0014 
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Swi0 = BELL ON ERROR 
(2000) 
mis ceuses a bell (or beep or click) on each error 
rep 
Sw9 = LOOP ON ERROR 
€ 1000) 
This will cause looping from failure point back te the 
last correctly initialized area of the current test. 
Sw8 = HALT PROGRAM 
(400) 


This initiates the following sequence: 

If program is relocated it moves back to bank zero. 
Flush out all possible D6E's. 

Turns off Memory Management. 

Restore loaders. 

Unmap the Unibus Map Cif there is one). 

Halt if under APT or ACT branch sel. 


aout wah 


SW7 = DETAILED ERROR REPORTS 
(200) 
After any normal error report is typed this option 
— he contents of the following registers to be 
RO. Ri, R2, R3, R4, RS, SP, “CONTROL”, “CPUERR” 
SW6 = INHIBIT CONFIGURATION MAP 
€100) 
This inhibits the printi of a showing the memor 
dentiquretian - reterense section 7.3 oo 
SWS = LIMIT MAX ERRORS PER BANK 
(40) 
This will limit the number of error typeouts per bank. 


The default is 10. DECIMAL, however this can ts 
changed by changing location "ERRMAX” manually. 


SEQ 0015 


——- - -_-— 
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Swe = FAT TERMINAL 
C20) 


SW3-1 


RARAARAN 
Pere OAM O 
Q&eanovuvver 
wr 


SWO 


NOUS Uifur oO 


This informs the ereerse that the console terminal hes 
e width of at least 132 columns (LA36 with wide paper). 


= TEST MODE 


Test modes determine the recurcion algorithm to be used 
during pattern tests. 


MODE NAME DESCRIPTION 


BAF PAF Banks forward, patterns forward 
BAFPAR Banks forward, patterns reverse 
BAWPAF Banks worst first, patterns forward. 
BAWPAPR. Banks worst first, patterns reverse. 
PAF BAF Patterns forward, banks forward 
PAFBAW Patterns forward, banks worst first 
PARBAF Patterns reverse, banks forward 
PARBAW Patterns reverse, banks worst first. 


For ore details reference section 2.4.1.1, 2.4.1.2 and 


. ater | aacamees BIT ERRORS (SBE's) 


For manufacturing purposes this switch should elways be 
on. For field service purposes this switch should 
elways be off. 


This switch will allow all ECC Single Bit errors to be 
reported by disabling error correction. 


nots printouts of SBE's are not distinguishable from 
‘s. 


NOTE 


If Double Bit Errors sre found in the memory, 
this switch should be set to make sure that new 
data can be written to the DBE locations. 


2.4.1.1 Test Mode Exemple - 
Ex le anelysis of mode 5 “PAFBAW”. Assume Panks O 1 ere MSV1I1-J 


and Banks 2 


4. 5 are MSV1I1-L. 





SEQ 0016 
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Assume also that Bank 3 is known bed by the progrem vie the sizing 
routine or previous runs The testing sequence would be as follows: 


sTEST MSV1i-J MEMORY TYPES FIRST 
;TEST KNOWN BAD MEMORY (BANK 3) 


TEST 17, BANK 3 
TEST 7, BANK 3 
TEST i, BANK 3 
TEST 2, BANK 3 
TEST 4. BANK 3 
TEST 5, BANK 3 
TEST 21, BANK 3 
TEST 20, BANK 3 
TEST 22, BANK 3 
TEST 26, BANK 3 


; TEST PRESUMED GOOD MEMORY (BANKS 2,4,5) 


TEST 17, BANK 2 
TEST 7, BANK 2 
TEST 1, BANK 2 
TEST 2, BANK 2 
TEST 4, BANK 2 
TEST 5, BANK 2 
TEST 21, BANK 2 
TEST 20, BANK 2 
TEST 22, BANK 2 
TEST 26, BANK 2 
TEST 17, BANK 4 
TEST 7, BANK 4 
TEST 1, BANK 4 
TEST 2, BANK 4 
TEST 4, BANK 4 
TEST 5. BANK 4 
TEST 21, BANK 4 
TEST 20, BANK 4 
TEST 2c, BANK 4 
TEST 26, BANK 4 
TEST 17, BANK 5 
TEST 7. BANK 5 
Teor i BANK 5S 
TEST 2, BANK 5 
TEST 4, BANK 5 
TEST 5, BANK 5 
TEST 21. BANK 5 
TEST 20, BANK 5 
TEST 22, BANK 5 
TEST 26, BANK 5 


SEQ@ 0017 
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sRELOCATE TEST PROGRAM SPACE (BANK O € 1) 


|  F BANK O 

TEST 2, BANK O 

TEST 35, BANK O 

TES 4, BANK O 

TEST 5S, BANK O 

TEST 26. BANK O 

TEST 1, BANK i 

TEST 2, BANK i 

TES 3, BANK 1 

TEST 4, BANK 1 

TEST 5, BANK 1 

TEST 26, BANK 1 

NOTE 

This is an example not an actual 
sequence. 


The test sequence wes forward (the si potters first, complex 
tests last) sequence of pozterns CMS +f. » Ve Be Be Sy Ba Bae 
20, 22, Se CMSVIT- J @ 4. Bs Be Se Bo Bete 


If the benk selection is forward the banks will be tested in the 
following order: 


Ba oy wae that are not protected or program space (from 0 to 


2. Perity banks that are not program space (from 0 to 167). 
3. The program now relocates tests: 
4. wee that were protected or program space (from 0O to 


S. Parity banks that were progrem spsce (from 0 to 167). 


If bank selection is worst first the configuration table will be 
consulted and banks will be tested in the following order. 


1. ECC banks that ere known bad and are --t protected or program 
space (from 0 to 167). 


2. Parity banks that are known bad and sre mt program space 
(from 0 to 167). 


3. ECC banks that are presumed good and are not protected or 





SEQ 0016 
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2.4.1.2 


program space (from 9 to 167). 


Perity banks thet ere presumed good end are not program space 
(from 0 to 167). 


The program now relocates tests: 


ECC banks that ere known bad and were protected or program 
spece (from 0 to 167). 


~~ aye that are known bad and were program space (from 
° —- 


ECC benks that are presumed 
program space (from 0 to 167). 


Parity banks that are presumed good and were program space 
(from 0 to 167). 


good and were protected or 


Test Mode Details - 
= “"BAFPAF” banks forward, patterns forward 
This is the default and simplest mode. 


This mode tests each bank completely from 0O to 167 
except those requiring relocations. 


While pete each bank the patterns ere run with the 
simple ones first building to the more complex. 


= “BAFPAR” = banks forward, patterns reverse 


This mode tests each bank completely from 0 to 167 
except those requiring relocations. 


While testing each bank the pztterns are run with the 
most complex ones first, working to the simple ones. 


= “BAWPAF” = Banks worst first, patterns forward 
This mode first tests each known bad bank completely 
from O to 167 except those requiring relocations, then 
presumed good benks are tested from 0 to 167 except 
those requiring relocation. 


While testi each bark the petterns are run with the 
simple ones first, building to the more complex. 


= "BAWPAR” = Banks worst first, patterns reverse 
This mode firet tests each known bad bank completely 





SEQ 0019 
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from 0O to 167 except those requiring relocations, then 
presumed good banks are tested from 0 to 167 except 
those requiring relocetions¢. ew 


While testing each bank the patterns are run with the 
most complex ones first, working to the simple ones. 


“PAFBAF” = Patterns forward, banks forward 


This mode tests each pattern completely with the simple 
ones first, building to the more complex. 


While testi each pattern the banks are run from 0 to 
167 except requiring relocations. 


“PAFBAW” = Patterns forward, banks worst first 


This mode tests each pattern completely with the simple 
ones first, building to the more complex. 


While testing each pattern first each known bad bank 
from 0 to 167 except those requiri relocations is 
run, then presumed good banks are run rom 0 to 167 
except those requiring relocations. 


“PARBAF” = Patterns Reverse, Banks Forward 


This mode tests each pattern coupnetesy with the most 
complex ones first, working to the simple ones. 


While testi each pattern the banks ere run from 0 to 
167 except requiring relocations. 


"“PARBAW" = Patterns Reverse. Banks Worst First 


This mode tests each pattern ooapdetety with the most 
complex ones first, working to the simple ones. 


While ye tte each pettern first each known bad bank 
from O to 167 except those that require relocations is 
run, then presumed good banks are run from 0 to 167 
except those requiring relocations. 


NOTE 


* Relocation is required to test the 
benk(s) in peeores space and elso to 
test any ECC banks protected b 

diagnostic checkmode wit the inhibi 

mode pointer off (zero)! 


SEQ 0020 


eee 


a - 
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rdetetete 


338 2.4.1.3 Test Mode Applications - | 
337 1. To verify correct operation of the memory system use Mode 0 | 
9 “BAFPAF”. | 
340 Adventages: Easy to understand. | 
os Slentverteane: 5 epee of e failing Bank, it may take a long | 
345 2. To get detailed error information on known bad Banks (found | 
oe by sizing routine) use Mode 2 “BAWPAF”. 

94 Adventages: Seeks Bad Banks. Easy to understand. 

35 Disadvant : Feilures other than zeros ones may teke a 


long time to find. 
3. To get error info on any memor roblem fast use Mode 4 
"Babbar 2° a * 


Advantages: Covers all banks fast. Easy to understand. 


Disadventages: Failures from only complex patterns may take 
@ long time to find. 


Advantages: Covers ell Banks fast. 


Disedventages: Difficult to understand failures reported ere 


960 

deg 4. To find any problem fast use Mode 7 “PARBAW”. 
+4 _ . 

not necesserily the most basic failure modes. 


,.-ceem-ssss sss ESS LSTA ————  - 


CVMJABO MSV11-J MEMORY DIAG. 


SETS STT ESTES ESET ES IS LT ttt Le | 


Sadia pedicel celediediodion toad 








MACRO YOS.02 Mondey 07-Oct-85 16:57 Page 25 


SEQ 0022 


2.4.2 Software Switch register - 
A software switch register exists in location 174. 


2.4.3 Special Memory Locations - 


EE . 


2.4.3.1 CACHE Constant - 


The CACHE constant is located at symbolic location “CACHK” and is used 
to enable CACHE. 


NOTE 


Bit 0 in the CACHE constant hes no 
effect since it is unconditionally set 
by the koe whenever it tries to 
enable C 


2.4.3.2 Configuration Teble 


The configuration table is located at symbolic location “CONFIG” and 
has the following format: 


CONFIG: First 16K Configuration words (2 each) 
2nd 16K Configuration words (2 each) 


200th 16K confi guration words (2 each) 


Configuration Words: 
LOW: BIT O ERRORS PRESENT 
BIT 1 te te ol EXISTS 







BIT 2-4 
BIT 5 SKIP ECC LOGIC TESTS FLAG (1=SKIP) 
BIT 6 PROTECTED REGION OF AN ECC MEMORY 
BIT 7 PROTECTED (PROGRAM SPACE ) 
BIT 8-11 CSR CODE 
BIT 12-15 

MED: BIT 0-7 
BIT 6-10 MENOR 
BIT ii CSR TESTED OK 
BIT 12 VEO 
BIT 13 “BACKGROUND PATTERN VALID” FLAG 
BIT 14 BANK SELECTED FOR TEST BY FIELD SERVICE MODE 
BIT 15 LOADERS HOME BANK 


This teble is used as the source for the configuration 
Map (reference. section 7.3). 


-_-- 








—_—— re eee 
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10 
10 2.4.4 Terminel Commands - 


2.4.4.1 Control “C” 
i This commend will: 
1. If Switch 8 (Helt Program) in the switch register is set halt 


1942 the progrem. 


toes 2. If Switch 8 is not set, unrelocete if program was reloceted. 
1045 3. Flush out any DBE's. 
ioe 4 Turn off Memory Menagement. 
ets S. HALT 
This command will only be recognized at the completion of the current 
test or pattern, or at the end of a line of an error message. 
5 
2.4.4.2 Control “K" (Kill error printout and skip pattern) 
i This command will allow you to stop an error printout and skip to the 
i next ttern. This is handy. for exemple, when you have e le bank 
: full of errors, have gotten enough information, and wish to skip to 
the next pattern. 
is 
1985 2.4.4.3 Control "T” (Tell me what's happening) 
i This command will print out the information encoded in the display 
i register. This is mainly intended for CPU's without a hardware 
: display register. 
1209 Example: 
: rg BANK = 17 TEST = 46 
07 RELOCATED BANK= 0 PAT= 26 
is 
Lore By use of Field Service Commend 17 “Trace” can be set so that it will 
107 automatically type out the bank and pattern numbers as each pattern is 
iors run. (Reference section 2.4.4.8.18). 


—_——— i - 


— 
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108s 





33338333 


S332333 


ssessesossses 


~ 


| ull cond andl ell call coal axa cond geal ceil geal antl eel 
NQULUNYE SO 


PP nee et eet tt pe et et eal Pet felt peat a ep fee ee fh ae ed a ped pt ba ft ph pt fe Peed pt ad fe Pt ped db pt 


i 
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2.4.4.4 Control “S”“ (Stop) 
This command will stop typeout (soon) and will wait for e Control “@”. 


2.4.4.5 Control “Q" (Quintinue) 


This commend will continue typi thet hes stopped by Control 
— If there hes been no Control “S” tone then this command is 


ignored. 

2.4.4.6 Control “F” (Field Service mode) 

This commend will case you to enter a mode which looks for sub 
commands. 


When the progrem is looking for a sub command an y ater that is not ea 


l l commend 1l cause a mini "'> os t therelore 
aan in doubt i. 99 (CR) and you ners an E tele. —_— 


NOTE 
Typing just cerriage return is a default 
command 0. 


2.4.4.7.1 Field Service Command 0 (Exit) 


re commend will ants ‘ae services Tee ne rome to y gp a task 
wes in rior to i control “F” e typi cerri 
return is @ eravie Eoamart O° ~~ _ 


SEQ 0024 
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2.4.4.7.2 Field Service Commend 1 (Read CSR) 
This commend will typeout the contents of the CSR. 


If there is more then one CSR on the CPU Cor if the often es not 
determined the CSR sentun Be Ege it will Ask you CSR(OLF)* = 
mien you must respond with en Hexidecimel number SS tren 0 to F. 

typing just cerriege return is e default 0. 


If the CSR you select ceuses ea tr to 4 the em will t “THIS 
tor DOES NOY EXIST". = — ” 


Re te pe ee 
iv] 


ie 


NOTE 


CSR references ere done in aeccordence 
with section 5.0. 


2.4.4.7.3 Field Service Command 2 (Load CSR) 
This commend will eneble you to load the CSR. 


If there is more than one CSR on the CPU (Cor if the poe ae hes not 
yet determined the CSR ot status vet) | it will eek you “WHICH CSR(0-F)” to 
which you must respond with an pg oh eel to | fumbe from 0 to Note 
typing ny cerr iege return is ea default 0 


If the 
CSR DOES NO 


The CSR will be read and displeyed es in commend 1. 


The preares will then esk you for the “CSR?” to which you must respond 
= Octel number. Note typing just cerr iage peture | is ea defeult 





yi Be enies* ceuses e trap to 4 the progres will type “THIS 


The me ere will then load the CSR end Read it again displaying ites 
ts. 


Oe ee be et ee ee be ee ee ee ee ae he fe ee ee ee et ee pee et ee ee ht pt ee be he ee ee ee he ee he pe pe pe pe 
Bee S 
ie 


Jgusan 
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| 


i 


@ GB CD OD OD 
a th i ch ee oe ~¢- ; 


. +4 o-4+.4 & + 


LBD LLB LLL LL OOOO TTS 


+7 ¥ > tee, 


wt ~-O +4 4 HOF 


t 
t 
t 
t 
t 
} 
t 
t 
' 
¥ 
t 
; 
t 
Ly 
t 
t 
4 
i 
5 
t 
Li 
i 
Li 
t 





2.4.4.7.4 Field Service Command 3 (Examine Memory) 


This commend will ellow you .co exemine eny ee eddress end does 
the necessery memory menegesent mapping for 


The ill eek for the “PHYSICAL ines (0-17757776)" to 
hich you aust reapend with en Octel number. 


f the eddreses eccess cevees e@ tr to 4 the progres will t 
TT aNeouT TRAP”. If the aiivenh ” enenee ceuses e trep to 114 ths 
progres will type “PARITY ABORT”. 


The contents of your physicel eddress will be typed. 


2.4.4.7.5 Field Service Command 4 (Modify Memory) 


This command ellows you to = any physicel eddress and does the 
necessery memory menagement mapping for you. 

em will eek you for the “PHYSICAL ADDRESS (0-17757776)" to 
at ee ee ik on tee el number. 


If the cess ceuses a trap to 4 the progres will t 
“TIMEOUT If the aeddress eccess ceuses e trap to 114 
progrem will ace “PARITY ABORT”. 


The progres will type “OLD DATA WAS” and the contents of your physicel 
address. 





The progres will “INPUT NEW DATA” to which ou aust vespens 
ith en Octal Ba lg typing just cerriege return is ea defeult 


The progres will attempt to write thie new sone into your icel 
address efter which it will reed it egein end type “DATA IS Rote aerd 
the new contents of your hans eddress. 





SEQ 0026 
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2.4.4.7.6 Field Service Command 5 (Select Bank Test) 
This command ellows you to run any benk with any pattern forever. 
— presses will ask you “BANK(O-177)" to which Ps od must respond with 

number f the is not accessi The progrem will 
eee “BANK NOT ACCESSIBLE” and ask question over. 
The program will —— ask "TEST (0-47)" to which you must respond 
with an Octal number 

NOTE 
Any pattern can be run _includi 


thet ere not part of the ApTee TABLE TABLE 
oe Crergrenee agetion 6.2.1) If 


selec Pat ve, the progres w will 
te “TEST 5 DATA. 1s?" 
must respond with an Octal number . 


If the perks ok ky fe selected requires relocation the program will type 
“BANK S RE ricussbiocanl end exit this command. Note normally this 
is true “— Bank 0 


The ere am will then arm ~ console keyodoard for interrupts and type 
“TO ESC TYPE ANY KEY! 


The test pattern will be entered and run until ea console key is 
depressed to escape this loop. 


2.4.4.7.7 Field Service Command 6 (Type Configuration Map) 
This command types the configuration map. 


This is useful efter a long run Covernight) to see all the banks thet 
ere marked as bed. (Espectelly if your console is a video terminal). 


For a detailed explanetion of the map reference section 7.3. 


SEQ 0027 





ee ee 
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i383 
1264 
+ 
1267 2.4.4.7.8 Field Service Commend 7 (SOB-A-LONG TEST) 
: This commend ellows execution of the SOB-A-LONG Test on ell 


non-protected Benks reference Section 6.2.2.26. Operetion is 
identical to command 5 except thet no Pattern or Bank is entered and 
each pess ceuses a Bell. 


2.4.4.7.9 Field Service Command & (Error Summary) 


This command t out the number of passes and the totel number of 
errors. If re were eny errors it will type out the Banks and the 
number of errors per bank up to 255 DECIMAL. 


This becomes useful after long runs (all night) on systems with ea 
video console terminal. 


eee eee ee ed 
SSSS33 35333333 


SSsscsas 


2.4.4.7.10 Field Service Command 9 (Refresh TEST) 


This command ellows execution of the Refresh Test on all non-protected 
Banks reference Section 6.2.2.19. Operation is identical to command 5 
except that no Pattern or Bank is entered and each pass causes a Bell. 


2.4.4.7.11 Field Service Command 10 (Set Fill Count) 


This command allows setti of the terminal fill count (necessary for 
LASO’s, ASR33‘s., and VTOS's). It is normally set to zero for LA36's, 
VTS2's. V¥T100's, etc. 


Deo ft bet het pt pet bt me 


C@rtOVawn 


whw 


2.4.4.7.12 Field Service Command 11 (Enter Kamikaze Mode) 


This command ellows you to run patterns thet ere normally not executed 
unless under APT or ACT. They ere usually very time consuming and can 
result in feilures thet are fatal to the ates et In effect you are 
aay to find e herdwere failure regardless of the consequences. 
Note thet most crashes do not wipe out the display information which 
is telli you whet the progrem was oon dust prior to failure. 
There are two ways to die here - Impatience rashes. 


Pee ee ee ree tee ne pee ee pee ee be ee pee Peed pat > ee ped Bt bet te et pet Pat pet pe pe pt 
eon 


WWUuWut 
~- 





errr 
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mp pe pe 
Sees 
beh ty 


2.4.4.7.13 Field Service Command 12 (Exit Kamikaze Mode) 
Return to the default mode of testing (undo Command 12). 


2.4.4.7.14 Field Service Commend 13 (Turn Cache Off) 


nie agree the Ceche constant to bypess cache (reference section 


2.4.4.8.15 Field Service Command 14 (Turn Cache On) 


ake nenane the Cache constant to use cache (reference section 


2.4.4.7.16 Field Service Command 15 (Test Only Selected Banks) 


This command allows you to center the test effort on only those benks 
that you are troubleshooting. You may also test banks that require 
relocation and were inaccessable via command 5. 


SSeSRESSSEseevaeressceases: 


2.4.4.7.17 Field Service Command 16 (Resume Testing All Banks) 
Return to the default mode of testing (undo Command 15). 


2.4.4.7.18 Field Service Command 17 (Resume Testing All Banks) 


Enable “Trace”. After exiting field service mode, the progrem will 
type out the bank and pattern numbers es each pattern is run. 





oe et he ee ee ee ee ee ee ee ee ee bee ee et tt ee ee ee ee et ee ee be hae pe a pe pt ee hs he ee hed be ee pe et pe pn 


5 
2.4.4.7.19 Field Service Command 18 (Resume Testing All Banks) 
335 Disable “Trace”. (undo Command 17). 


———— nnn = 
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2.5 Execution Times 
2.5.1 Typicel (System) - 


Execution time depends on many variables; 
measured 


times on an 117238: 


K words of novas: o< Memory 
Normal Pass Sec 


Quick Verify Hin Sec 
Kemikeze Mode Min Sec 
Kemikaze QV Min Sec 
K words of MSV11- * ener 
Normel Pass Sec 
Quick Verify Hin Sec 
Kamikaze Mode Min Sec 
Kamikaze QV Min Sec 
K words of MSV11-P Memory 
Normal Pass Min Sec 
Quick Verify Min Sec 
Kamikaze Mode Min Sec 
Kamikeze QV Min Sec 


2.5.2 Calculations (System) 
Normel Pass 
Add 


i 
f 
: 
: 
: 


Quick Verify Pass 


a8 
: 
: 


Kamikaze Mode 
Add 


however here are 


10 min. per 128K words for approximate pass times. 


SE@ 0050 


ee ee ee -_—— 


-- ooo 
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SEQ 003i 
144 
144 
1444 
1445 
iM 2.5.3 T 1 (Tests) 
owe ypice ests 
| 144s 
4 Test Time Description 
| fe 
4 0000 ;<1 SEC DATA PATTERN TEST 
4 MTOOO1 ;<1 SEC ADDRESS TEST | 
1455 MTOOO2 ;<1 SEC COMPLEMENT ADDRESS TEST | 
14 MTOOOS ; 1 SEC 3 XOR 9 WORST CASE NOISE TEST 
14 MTOOO04 ; 1 SEC S TEST | 
14 MTOOOS ; 1 SEC 
14 MTOOO06 ;<1 SEC | 
1460 MTOOO7 ;<1 SEC 
146 MTO010 ;<1i SEC EST 
i MT0014 ; 1 SEC E BIT ERROR TEST 
46 MTOO17 ;<1i SEC O'S T 
1464 MT : 1 SEC CSR ON SINGLE BIT ERROR TEST 
1465 MTOO21 ; 1 SEC 1'S TEST 
1466 MTO0022 ;10 SEC REF 3 
146 MTO0023 ;10 SEC SHIFTING DIAGONAL TEST 
1 MT0024 ;20 SEC FAST GALLOPING PATTERN TEST 
1 MTO0026 ;<1 SEC RANDOM DATA TEST 
1470 MTO0027 ; 1 SEC UNIQUE BANK TEST 
147 MTOOSO ; 1 SEC FLUSH OUT DBE'S TEST 
147 MTOO31 ; 3 SEC SOB-A-LONG TEST 
147 MTOO3S2 ;<1 SEC WRITE RECOVERY TEST 
474 MTOO33 ;35 SEC BRANCH GOBBLE TEST 
475 MTOO34 ;<1 SEC T ERROR TEST 
azs MTOO3S ;<1 SEC WORST CASE PARITY TEST 
16 MTOO36 ; 1 SEC CORRECTION CODE TEST 
& $ MTOO37 ;<1 SEC CHECK ECC DISABLE TEST 
147 MT0041 ; 1 SEC ADDRESS TO CSR ON DBC TEST 
14 MT0042 ;<1 SEC EX D ADDRESS TO CSR ON ERROR TEST 
14 MTO043 ;<1 SEC WRITE BYTE TEST 
14 0044 ; 5 SEC SHIFTING CHECKBITS THROUGH csr TEST 
14 MTOO4S ;<1 SEC SYNDROME BITS TO THE CSR ON A DBE TEST 
1498 MTOO046 ; 1 SEC CHECK SINGLE BIT ERRORS WITH ECC DISABLED TEST 
1485 MTO0047 ;<1i SEC NO CSR UPDATE WITH EXISTING DBE TEST 





eee ee 
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SEQ 0032 
1408 3.0 ERROR INFORMATION 
49 3.1 Error Reporting 
1492 Most errors ere reported using the wy hendler provided b 
149 SYSMAC. . Most errors will be of t SCREMORY DATA ERROR” ee Me whic 
1494 will be described here. MEMORY DATA ERRORS will also cause 
at to be marked es Bad in the configuration table. 
1497 Other errors are best explained by referencing the specific typeout 
74 end if necessary the program listing. 
; Ex le i: 
Y DATA ERROR 

i VADD PADD GOOD BAD XOR CSR MTYP PAT 
1 022132 37 060006 03700006 000000 000100 000100 0 €E 06 
1 022132 37 060006 03700006 000000 000100 000100 0 06 
1 022132 37 060006 03700006 000000 000100 000100 0 €E 06 
; 022132 37 060006 03700006 000000 000100 000100 0 €E 06 
i While testing Bank 37 at virtual address 60006 (virtuai addresses are 
: elways between 60000 and 157776 for mapping purposes), physical 

10 eddress 3700006 (that's Bank 37 physicel 6 within the Bank) with 
151 Pattern 6 (CInitiel Date Test), t ae - was 0 but the 
1 12 - aot read (BAD) was me — exclusive Good e 
i yresee which indicates failing bit(s) (Bit 6). It is an 
: : Vil-J teec) Memory. The CSR is ay OB at 172000. 
151 Exemple 2: 
: 15 HEMORY DATA ERROR 

18 B PADD GOOD BAD XOR CSR MTYP PAT 
1519 022132 35 000001 90 E 06 
1 022132 35 060002 03500002 000000 000100 000100 0 €E 06 
1521 022132 35 060006 03500006 000000 000100 000100 0 €E 06 
: : While testing “— 35. virtuel address 60000, physical address 3500000 
1 with Pattern 6 CInitial iDste Test), the good date expected was 0 but 
1525 the date actually read (BAD) wes 1, the exclusive OR at Good Bad 
1 ylenees 1 which indicates oy “Failing wt: (Bit 0). It is an MSV11-J 
: ECC) Memory and the CSR is located at 17200C. 
: NOTE 
1 Subsequent errors of the same test do 
1533 not type s new heading. 
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3.2 Error Abbreviations 
The following is a list of all abbreviations used in error reports. 


@ OF ERRORS pymer of Errors thet were detected. ’ 
iST ADD First Address thet feil 
The arvey number thet was locked up in the MS11-M CSR. 
ioe 2 of CPU's APT expects on the system. 
T Core size. 
APT MOS size. 
date 


Bad 
Bad ord. #1 of ea double word data value. 
Bad re @2 of :, ase word date velue. 


he Bank e- A, Banks ere 16K words long. 
Bed Check Code Bits. 

The 7 bit value of the Check Code Bits. 
The CACHE Control register. 

Rt ister. 

Control end tetus Register. 

CSR NUMBER (0-F Hexidecimal). 

The CACHE Dete Register. 

Double Bit Error Cuncorrectable error). 








Device Address. 
Error  Carrenteble Code. 
Good Check Code Bits. 


Good Check Code Sits. 
Good Word #1 of e double word date value. 
Good Word @2 of ea double word dats value. 


Good date 

MSV1i1-J Size. 

Memory Error register. 

Memor t Register #0. 





Memory t Reg 
Memory T crsvi3- -J, Sensvil - or MSV11-P). 


a dasa asserted by the program after mapping). 
Pattern number. 
Program Counter at the time the error occurred. 


Single Bit Error (correctable error). 

Vir Address (asserted by the program before mapping). 

The data that wes written into M4 Tet half of a double word. 
The date thet was written into the 2nd half of ea double word. 
Exclusive OR of the good and bad date. Shows the bad bits. 
Address under test 





a anita 


-——_ a wre eee 


ee eee eee 
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ol oleh onlanl axl and acl onl onl onl onl acaed ond 
SSsesessssssse 


Sa3882 


ete 
2S 


3.3 Error Helts 

There ere several Halts in the program. 

All unused trep vectors contain e trap catcher (.WORD .+2,HALT). 

An undefined TRAP instruction halts at symbolic location “$HALT2”. 
The APT down loed sequence will halt at symbolic location “APTHLT”. 
Halt on Error option (SW15 Set) at symbolic location “$HALT”. 

Halt progrem (SWS Set) at symbolic location “SEXHALT”. 


Power Feil will normally halt at the end of the shut down sequence 
(symbolic location “$ ws 


Power Fail has e fatel Halt at symbolic location "SILLUP” which can be 
c by power up occurring before power down sequence completed or 
by power down before e power up sequence is completed. 


SEQ 0054 


eee 


| 
| 
| 


CVMJABO MSV11-J MEMORY DIAG. 








MACRO YOS.02 Monday 07-Oct-85 16:57 P 36 
_ SEQ@ 0055 


4.0 PROGRESS REPORTS 
Pess complete typeouts es follows: 


END PASS 4 0 
END PASS o i 
END PASS oQVv 2 


NOTE 


Pass 2 was flegged eas a Quick Verif 
Pess. (Because of a change in SWS) 


To obtain progress reports while executing, typi ea Control "T" will 
print out cae jatoraction encoded in the Sleplay fentoter. 

Exemple: 

BANK= 2 TEST= 34 


Reference Section 2.4.4.7.18 for more information on Trac in- 


5.0 CSR INFORMATION TABLES 


The followi is @ picture view of the current control status 
registers ich can be tested by this program. It shows bit 
assignments definitions to provide a handy reference, and 


NOTE 


All unused bits in each CSR ere equal to zero. 


ee 
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(I) 


(II° 


(III) 


5.1 MSV1i1-J CSR 


er ee a oe Se te OS Oe 
!DE!EA:SI: ! SYNDROMES 'SE!IP!DC:EC!EE! 
. = eee ee ea a I . 


15 14 13 12 11 10 09 08 07 06 O05 04 03 02 01 00 


Bit essignments ere defined 


es follows: 


BIT1i5 ee ERRGR 
On @ read to memory (ECC Disable 
Bit. = 0), this bit is set if 
: _ ents error occurs. The 

ror eddress is stored in the 
csR. Setting this bit elso 
turns on e red LED et the rear of 
the card for e visuel indication. 
This bit is elec set in ECC 
Diseble Mode if ea SERR or DERR 
occurs. 


BIT14 EVUB ERROR ADDRESS 
With Bit 14 = 1, e read to the CSR 
annua ae 35 eddress A2i 

n @ may no 
diogestic: the syndrome 
register. 


SEQ 0056 
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SEQ 00357 
1716 
1719 BIT13 SET INHIBIT MODE 
17 When this bit is set to 
1721 e "1", it enables the inhibit 
17 mode pointer to inhibi 
17 either the first pod second 
17 16K "1 2 ever or pei "8 into the 
17 Dieg Check C Diseble | 
17 BITSOS-10 CHECK BIT STORAGE (CSR II) 
17 Check Bit Storage (Dieg CK | 
+ Bit 2 = 1) 
1732 
17 
17 
1735 
un 
17 
1739 
1740 
+78 
ita 
+743 
745 13, 
17 set to indicate thet the 
+7ee memory under test is e MSV11-J. 
1749 ox ress. 11 Q@BUS ADDRESS STORAGE (CSR I) 
i Ck sh 2 s °. Ecc 
17 le Bit 1 = 0) 
1 If a double or single error 
1 Read cycle, then 
a 
17 : 
3 thet SERR 
7 CCSR 15) is set but 
tie CSR 14 is not set. 
17 EQB Address Storage ( Ck 
17 7s : 5 pe Ecc Sfeebie it 
1765 
+768 i & 2 ante or oe slome error 
176 "AT the le, 
1768 qieress Bits Ail? 
+78 All ere stored in its 
i7 11 through bese 
1771 Bits A21 through Alé are 
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With Bit 13 set to e 0. Bit 
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The check bite desired for «a 
given date pattern are written 
into Bite 5 through 11 of 

the CSR. A word or write byte 
memory will write the check bits 
from tne CSR to the MOS ap 
(CSR 2 = 1) instead of the check 
bite generated on the date 

to be written. Single errors ' 
on the read portion of the DATOS 
cycle ere corrected. 


A read to the memory will | 
read the check bits stored in 
eanery ane clock them into 
the CSR. 


SE3ESS5SSESSS22 


ee eee 


I? ea double error or single 
error occurs the DERR or 


eddress bits. In Diagnostic 
Check Mode the error syndrome 
bits will be read when CSR 
Bits 10-5 ere read. 


race ort sy Read/Write bit 
is reset on power up and 
BUS INIT. 


REET 
é 
; 


If this bit is set, no si 
errors will be corrected. 
single error will set CSR 4 
and CSR 15 or a double error 


pate it et pat bt pet 


VMrowoeotQuvsaunvrd 


BITO1 DISABLE CORRECTION MODE 
e 
"eA 





us 

The 1K block of 

the error occurs th aise 

be stored in the . he 
priority of e _and DERR 
will be the same, i.@e., 

lest error information wil 
elways be stored unless ea 
precedes a SERR. If @ le 
error occurs during @ write byte 
cycle, the write portion of 

t orete will not be aborted 
The check bits written will 


ak eee ed et tt 
SOODOHOVOODO 


= 
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SE@ 0041 
iit 
19 have been genereted on the 
1939 date written. This means thet 
1940 if a ocogne or or double error 
rea existed in lecetion eccessed. 
1343 it would be pe BA Cunless the 
| 194 errors were herd). 
| i345 This bit is ea diagnostic aid 
34) 
bos 4 


estaaktae logic. 


ITOO UNCORRECTABLE ERROR 
OND SCATION ENABLE 
If ea double error occurs with 
ECC enabled or e single error 
or double error with ECC 
disabled, on a Read cycle to the 
memory and this bit is set, 
then PBL will be asserted. 










eae aa 
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ne 
EE TE TT 


2 EEE —~-- - 
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961 S.2 MSV11-L/P CSR 

368 

4000 pe eee ene e nce n eee e nee see reese ree see sees 

965 ax @Wigwaer se @e ee ge ES 
‘PETEU! + } ADDRESS : + IMP! TAE? 

367 epe@teoeeeourne sbeaktnan Ss 


15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 


at 


ee ee ee pe be ee pe pe pe pe 


set, they contain the 


0 
372 Bit assignments ere defined as follows: 
97 BIT15 PARITY ERROR 
1974 
i373 BIT14 EQ6 ERROR 
97 RETRIEVAL If the 
97 memory is - an 
97 Ext tended a 
9 BIT14 is zero, the low 
19860 a athe 
i frie (Bits 
-17 uhen BITi4 is 
1985 feili ing ng Be 
1 eaveileable (Bits 18-21 
i of address). If 
: aonery is one asus. 
9 r disables this 
1990 bi so thet it is read 
199 rt say and equal to ze- 
1396 ro. 
199 
13e5 BITS 11-5 ERROR 
1 ADDRESS With BIT14 
13 
1999 


l eddress 
with erfi4 cleered, 
they contain a low 
order perity error ad- 
dress 17-1 11 of 


BITO2 WRITE WRONG 
PARITY Normal perity 
(odd) when clear 

other perity Ceven} 
when set. 


BITOO ACTION ENABLE No 
ection when clear; 
trap to vector 114 
when set. 
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2017 


j st 
| 1 
| ; 6.0 SUB-TEST SUMMARIES 
6.1 Tests 
TEST 
5 TEST 


wr 


: TEST 


TEST 
$ TEST 
i 


i 


BIT TEST OF ALL CSR‘'S/MATCH ALL CSR‘'S WITH MEMORY 
(CSR Access may cause wrong Type of Traps) 


2 


TEST BANK O ACCESSES 
Feilures are fatel. 


3 

TEST BANKS 1-177 COCTAL) FOR ZEROS AND ONES 
Errors ere not typed here - only logged in 
the configuration table 

4 

ECC INHIBIT MODE POINTER TEST 

5 

DIAGNOSTIC MODE DISPATCH ROUTINE 

This test runs ell the patterns in the 
mode selected. 

6 


UNIQUE BANK TEST 
Pattern 27 is run 


SEQ 0045 


-_—_---=- — 
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6.2 Tests 
6.2.1 Generel Test Information 


Actual Tests are identified by symbolic locations "MTPXYY" where 
may be ~ 7 program indicator (A,8,C,etc) or 0 and YY will a the 
number of test 


ot 4 Ereseaeres for each test are identified b aaetre locations 
YY" where YY will be the number of the tes 


Tests reside in 4 scripts that are scanned for execution. Symbolic 
location “MKCSRT“ is a table of tests that can run once for each | 
_ benk. Symbolic location “MKPAT" is a table of tests that 

run on each Bank of ECC memor 
Symbol ic location “MUPAT” is a table of tests that can run 
B of ry memory . Symbolic location “FSPAT” ee & esbie of 
tests that cen run in Field Service Mode (command 5). 


Soooe 
sane 


ye ist 3 Bs doy are ore seapastely om ontrolled by the APT E-table (Ceven 
not running ifications to this table can be made 
iD with APT, or (2) manuelly. 
Example E-table Segment: 


;THE FOLLOWING LOCATIONS SPECIFY WHICH TESTS 
ee TO BE RUN FOR PARTICULAR MEMORIES 


;REF ERENCE THE TABLE LISTED BELOW TO RELATE arts oe TESTS. 


seagatsssssssesssess 





;BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE, BITO SET 
099 ;IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE... 
HY 
si ;NOTE**#NULL TESTS DO NOT TAKE ANY TIME 
21 : RECOMMENDED VALUE 
210 $D0WO: .WORD 177777 ;ECC CSR TESTS 177777 TABLE 
2108 $00Wi: #.WORD 177777 ;ECC CSR TESTS 
105 $D0W2:  .WORD 177777 ;ECC TES 
2106 $00W3: # .WORD 177777 :ECC TEST 
210 $D0W4:  .WORD 177777 ;PARITY TESTS 003777 TABL 
2108 $D0WS: .WORD 177777 ;PARITY TESTS 177774 TABLE 
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NNN MPRP 


6.2.2 Specific Tests 


Spraroroterere repens 
Oe~AUV Sule 


Pe pee he pt he pe pe pe he pe pe 


6.2.2.1 Test 0 Basic Date Test 
Writes Reads R2 into ae 16K Bank. 


This is used for Zeros and Ones testing and in Field Service Mode for 
any console selected Test. 


It can execute out of the USER Instruction PAR's. 


NOTE 


It is frequently modified dynamically 
such that (1) it returns after writing 
only (the ist NOP is replaced with a 
RET >) or (2) it only counts Errors 
(the code PERRO2 and NOP are replaced 
with INC @@PATERR). 


MMR MARP MRP 
reeevtetetetetete te. he tetecetes 
SSe aka 


-_——— —— oe — 


' 
; 
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6.2.2.2 Test i Address Test 


Writes Reads an incrementing pattern equivalent to 
addressed into a 16K Bank. 


It can execute out of the USER Instruction PAR's. 


physicel 


SEQ 0046 


Ne ————— oo <o 
TN 
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MRRP 
Tage 


ep ee pe 
o 
tT 


6.2.2.3 Test 2 Complement Address Test 


Writes the complement of the sicel address from high addresses to 
love (write dour) and reads Maa oe addresses to high (read up). 


This provides the complement of the coverage of Test 1 in both date 
pattern and addressing sequence. 


It can execute out of the USER Instruction PAR's. 


——ee ee 


NNNVNMNYRPP 
aan 
Sane soe 


_— eee ee - 





re ee 
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MMA 
om he pe pe pe 


SSzszz 


6.2.2.4 Test 3 3 xXOR 9 
Writes Reads a Test that complements eas address bits 3 and 9 
change. 


ane 


WSSES 


This test_is run 4 times (1) with Zeros Ones. (2) with Ones 
Zeros, (3) with 401 Ones, and and (4) with Gnes 401. The test of 
the 401 is to force a the parity bits to become involved. 


It can execute out of the USER Dete PDR's, the User Instruction PAR's, 
the Kernel Deta PAR‘s and the Supervisor Data PAR‘s. 


ee ee 


Ss28se 


NRNNARNARNANMRRRARPR 


EAS ALLS HTT Lr re ee rene -- 
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6.2.2.5 Test 4 Roteting Zeros Test 


Writes e background pattern of Ones. Satenee s mere ogg Ags. left 
thru each per * ytes (18 times) and then checks that cerry is 
Zero and the word (2 bytes) is still all Ones. 


It can execute out of the User Date PAR's and the Kernel Date PAR's 


NOTE 


It is not uncommon to observe the gore 
dete equel to the bad date. his 
indicates that ie cerry wes not clear 
efter 18 ROLB‘s 


ee EE _——_—— 





MEE TET TTT LLL al 
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6.2.2.6 Test 5 Rotating Ones Test 

Writes e beckground pattern of Zeros. Rotetes ae One cerry bit left 
thru each peir of bytes (168 times) and then checks that the Cerry is ea 
One end the Word (2 Bytes) is still all Zeros. 

This provides the complement of the coverage of Test 4 in date. 


It can execute out of the User Date PAR's and the Kernel Dete PAR‘'s. 


NOTE 


It is not uncommon to observe the good 

date equal the bed deta. This indicetes 

ges the Cerry was not set efter i18 
‘s. 


SEQ 0050 
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6.2.2.7 Test 6 Initiel Date Test 

Writes Reeds e double word first with ell bits O except 1 (for every 
5 +b aaa Second with ell bits 1 except 1 (for every bit 

position). 


This is e very quick check of the dete peths. 


SEQ 0051 
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6.2.2.8 Test 7 Address Bit Test 





onplenant Address contents. 
ad Address for e non-zero word. 


This is @ very quick check of the address bit uniqueness. 


— 
a 
+ 
a 
a 
a 
. 
a 
4 
a 
* 
a 
> 
a 
> 
a 
- 
/ 
, 
4 
> 
} 
> 
/ 
> 
i 
’ 
’ 
> 
a 
> 
/ 
> 
/ 
- 
/ 
7 
, 
_ 
a 
. 
4 
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6.2.2.9 Test 10 Byte Addressing Test 
With ECC Disabled. 
Writes ell ones to a double word. 
For each of the 4 Bytes in the Double Word. 
ears one byte. 
Reeds ell 4 bytes from double word. 
Checks for only proper byte cleer. 
All other bytes set to ell ones. 


This is only done on one double word address. 


NOTE 


This is run for ECC memory only 


SE@ 0055 


emu er ee - 


ee - — 


-— 
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6.2.2.10 


7. 


SEQ 0054 


Test 14 Basic Double Bit Error Test 

Write the CSR to enable diag mode with e double bit error 
pe of 110011 end Uncorrectable Reser Indication 
en 


Write first AUT in e 16k benk with date of ell zero's. 
This will write the check bits in (1) 


Read address, this should cause e double bit error. 8US PBL 
is esserted and we check for a perity trap to occur. 


Read the CSR for check bits in (1) and Uncorrecteble Error 
Indicator. 


Write ones to the high byte of the address under test. Since 
ea OBE exsists eat this eddress the write should be aborted. 


Read address end check for ea Parity trap to occur es e result of (5) 


Repeat 5 and 6 for date of ones in the low byte and check for 
write abort and parity trap. 


This test checks to see if a double bit error will be eborted and a 
byte write of e double bit error will be aborted. 


NOTE 
This test is only run for the MSV11-J 


- << e eeeeee 
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6.2.2.11 Test 17 Holding l‘s 0's Test 
1. Write ea 16K Bank with elternating Bytes of Zeros Ones 
writing e Byte at a time. 
2. Read each Word for correct Test. 
3. Do (1-2) again for a complement Test. 
This checks the memory for the capability of holding O's i's. 


NRVNNVANVAYNVNANNMAPRRP 


SesSteecese 


— ~— er OE 


—— ee 
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6.2.2.12 


75 
$7 
7 
79 
? 
t 
$7 
+4 
+ 
7 
? 
me 





Test 20 Syndrome Bits to the CSR on ea SBE Test 


Write CSR with check bits to correct bit 0 of the first AUT 
16k bank from e 0 to a 1 with diag mode. 


Write AUT with date of O's creating a SBE. 
Cleer CSR. 


Read the AUT to clock the eddress and syndromes into the CSR. 


Read the CSR for the SBE indicator, bit 4. 


Write the CSR to dieg mode to clock the syndrome bits into 
CSR bits 5-11. 


Read the CSR for the proper syndrome bits. 
Repeat 1-7 for ell 16 date bits. 


Repeat 1-8 for date of ones so that e correction will occur 
from eal to e zero. 


This test checks to see that the EDC chip can detect Single Bit 
errors for all 16 data bits by checking for a bite4 and that 
the proper syndrome bits sre placed in the CSR 


NOTE 
This test is only run for the MSV11-J 


SEQ 0056 
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6.2.2.13 Test 21 Marching 0's i1‘s Test 


1. 


Write ea Background of alternating Bytes of Zeros 


(b) 
(c) 


the 16K Bank addressing Down 
Read check a word 
Byte Swap a word 
Read check ea word 


the 16K Bank addressing Up 
ao a e — 

e @ wor 
Read check a word 


the 16K Bank addressing Up 
Read check a word 
Byte Swap ae word 


) Read check ea word 
For 
Ca) 


the 16K Bank addressing Down 
ae hag a —_— 

€ @ wo 
eos check a word 


This checks the integrity of the 32 Bit Double Words. 
It can execute out of the Vser Data PAR's. 


NOTE 


It is not uncommon to see a misleading 
error typeout because the second test in 
each case is J upon e@ byteswap of 
the first test which may or may not have 
failed. If the error report indicates 
errors in peirs with the bad bit in the 
second report =. the seme bit 
position relative to a byte then you 
should ignore the second error report. 


Ones 


SEQ 0057 





—e- eS eS 
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6.2.2.14 Test 22 Refresh Test 


1. Write a diagonal Test of ones on every KDIAG(TH) stripe 


write zeros elsewhere. 


This Test is on addresses not bit positions. 


Example: 
Address 
LSB‘s 


NOTE 


Exemple uses KDIAG of value 4 more typical 
Consult the symbolic definition o 


of ‘ 
the program listing to be sure. 


2. Disturb each row for > 3.2ms 
3. Read check diagonal pattern 


4. Co (1-3) KDIAG times moving the placement of the diagonal 
stripe to cover all address positions. 


5. Do (1-4) for ea complement pattern 
(zeros in a background of ones) 


NOTE 
This test is not normally 
except r or AcT. 
invoked VIA Field Service C 
(Kamikaze ‘ 


KOooro°oo 
orooorocoe 
ooroooro 
ooorocor 
KY oOoocoroo°o 
oroooroco 


executed 
It may be 
i3 


is a value 
f "KDIAG” 


ooroooreo 
oooroo°or 


in 


SEQ 0058 
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6.2.2.15 Test 23 Shifting Diagonal Test 


Similer in overall operation to test 22 except it does not delay 
for refresh and disturb rows. 


NOTE 


This test is not normally executed 
except under APT or ACT. It may be 
invoked VIA Field Service Command 13 
(Kamikaze Mode). 


SEQ 0059 


-_—- ee At. te i i a ea. al Cc CC Cll ll LL LLL LLL LL LL LE A LL LLL LLL LLL LLL LLL LLL LLL LL LLL ALA A AL me 
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| 2536 


: 





6.2.2.16 Test 24 Fast Galloping Pattern Test 


This does a classicel llopi pettern except that addressing is 
incremented by 400 Octal lavare 64th double word) 


NOTE 


This test is not normally executed 
—— under APT or ACT. It may be 
invoked VIA Field Service Command 13 
(Kamikaze Mode). 


— nee ae 
EE 


- 


— ee eee ee ee — 
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6.2.2.17 Test 26 Random Date Test 

Write Random Date in e 16K Bank while incrementing the Addresses. 

Read check Random Date. 

This routine regenerates the same random numbers by using the same 


seed as the write sequence. After the read check the seed is updeted 
so that the next use of this pattern will not invoke the same sequence 
of random numbers. 


If you wish to change the random sequence so that it is different than 
any other run in the same configuration then there are 2 ways of doing 
so. 


i. mags oumments locations “SECDHI” and “SEEDLO” to any number 
you lik 


2. Enter Field Gory igo Mode and one this Test (command 5) 
on some (any good) bank for a short time (30 sec or so). 


This can execute out of the User Date PAR's, the Kernel Data PAR's, 
and the Supervisor Date PAR's. 


SEQ 0061 


Se ee ee 


—_——_— 


ore eee ee 
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6.2.2.18 Test 27 Unique Bank Test 
This Test uses Test 0 to write read the Bank number in each 


It does not test Banks thet require relocation to test. 


It does not run es pert of any script but rather is alweys run after 
normal pattern tests are complete. 


SEQ 0062 


me ee 
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6.2.2.19 Test 30 Flush Out DBE‘s Test 


This Reads each location then moves the old value beck in. This is 
done with ECC Disabled and therefore corrects any DBE’s or SBE‘s Cif 


possible). 


It does not run es part of any script ae rather is elways just 
prior to ce End of Pass Code, pert of ea Control “ce (Boot ) 
commend, es part of End of Pass pe for ACT or XXDP Chain Mode, 
es pert of h ing sequence after en error if under ACT or APT. and es 
pert of e shut sequence directed by Switch 8 (Halt Program). 


SEQ 0065 


eee ea 


-_ 
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SEQ 0064 


6.2.2.20 Test 31 SOB-A-LONG Test 
Ret ionelizetion 


» we nmust 


iteelf nay provide 
in which eny com 


The SOB instruction is the only PDP-11 instruction thet is (1) « 
single operend, (2) can be repeatedly executed et the seme PC and, (3) 
can escepe this repetitious loop. 


Hence, it cen be peas ibis to SOB ea MOS cell to death (Cor et least 
—— em Die. ae o SOB ea core into over-heating Cor et leest wera 
iscomfort 


The SOB Routine will be loaded and called with RO set equel to the oY 
constent “SOBK", Ri set equal to the complement of e “SOB RO, 
Instruction #100776". 


Simplified SOB Exemple: 


— ee = 









is: S08 RO,1$ ;S08 till RO underflows 
MOV R1.,1i$% sWrite complement of S08 
R1,1$% ;Read oo not Sos 
23 ‘Skip if OK 


:Trep report error 
:;Code to oe ont? 2 moved 
:Forward run egein 


2s: 





The velue of the SOB constant cen be found et symbolic locetion “SOBK" 
(typicel 25 decimel). 


Thie test is not in the normal script of execution but ma 
vie the APT E-TABLE, reference symbolic locations “MKPAT ”, 





be added 
“MJPAT” 


“s00W2-5°. Field Service Mode command 8 is the normal method of 
running this pettern. 
NOTE 
This test is not normelly executed 
except under APT or ACT. It may be 
inveked VIA Field Service 13 


(Kemikeze Mode). 
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6.2.2.21 Test 32 Write Recovery Test 


Thies test ceuses e WRITE, READ. WRITE, READ. ... to occur in sense 
and if the ist. Srd. Sth ..-READ ie bed the progres mey bomb o 
the 2nd, 4th, 6th, ... READ is bed the progres wil erasefully “tree 





Write Recovery Test 

i test dif 2s from other teste in thet it consists 
° x. 

To sid 





emell test progres ectually running in the bank under test. 
The progres is self aoeery and ek oir toust te - * 
Senk * atieg.* * with ellow the user to et least see which senory 
9 
test consists of 1/2 of the benk stored with “MOV R2,-(PC)” 
ond. the oth r 1/2 containing "177667". 177667" is the compi 

of * RO)" inetruction. R2 contains “COM =<88 2? " instruction 
- oy to the bank and Ri contains the highest test eddress in 


bank . 
If you retend this so fer the “ot is eeey- 
test e ion is es 
1. The "MOV -CPC)* instruction euaptee © iy, 
the contents of R2 in the nenked ¢ te -CPC). 
2. Since R2 conteins e “COM -CR1)" SL. it S comptes leaents 
eddress unde this 


the algae: rt 

"177667" so efter the oton : 

cleverly thie is the “JP C 
3. Thies sequence continues until the 











ane snanuger. RO contained the return eddrese beck 
Se : 
4. These steps sre repeated for each bank under test. 


NOTE 


This test is a 3 noraaily executed 
: under ACT. It may be 
inveked VIA Field Eevvlee’ Commend i153 
(Kamikaze Mode). 
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6.2.2.22 Test 33 Branch Gobble Test 


This test loads e small routine into the onnery under test. The 
routine moves itself along in memory one word after each pess so that 
when it reeches the end every instruction hes executed from oy 
lecation with the exception of the beginning and end of each tes 
eree. 


The Brench Gobble’'s general format efter you eliminate setup code and 
code to move the progrem elong is es follows 
















BGIEST: 0 ;TEST WORD 
BRGOBB: SEC 
cTEST ‘INC LOM BYTE 
LOOP AFTER 126 TIMES 
BGTEST+1 INC HIgh BYTE 
BRGOBB ;LOOP 128 TIME 
18: ‘GRANCH IF V-BIT SET (SHOULD BED 
‘ERROR TRAP 
2¢: ‘CLEAR V-BIT 
BGTEST SINC HIGH BYTE ONE LAST TIME 
3$ ‘BRANCH IF C-BIT SET (SHOULD NOT BE 
33 ‘BRANCH IF V-BIT CLEAR 
a3 ‘BRANCH IF N-BIT SET (SHOULD 
} oh ;ERROR TRAP 
3 





This code ofa enetiy ceme from the POP-11 Femily Instruction 
Enose tear ark he first rs nomen s fell succepteble to this 
section of that diagnostic and Soon on importent memory 
exerciser ever since. 


NOTE 


This test is not normelly executed 
except under APT or ACT. It may be 
invoked VIA Field Service Commend 13 
(Kamikeze Mode). 


SEQ 0066 


° -< eee ee 
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6.2.2.23 Test 34 Soft Error Test 


Rationelizetion 


MOS chips heave e failure mode in which they can randomly pick or drop 
bits. PThis is ceused =o S qerecenes perdi ing the cell. If the 
then the electrons displaced by the 


cell is very smell (Cand 
Alphe perticle ere sufficient to cause the cell to change from @ one 
to e zero or from e zero to @ one. 


This test is controlled oe rogrem so thet it is re to 





create ea Test of i on alternate passes of the 
grape The confi ation teble is used to fleg banks that have the 
es invelidated euse another Test was written over this 
background. 





This Test is nothing more than ea clever use of Test 0. 


SEQ 0067 


- er eee + 


-_ 


-_— 


mee ae el —e—si—i—i—‘“ Ct 
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6.2.2.24 Test 35 Worst Case Perity Test 
1. Force Write Wrong Parity in each 1K word block of the Memory 
Under Test. 


2. Read with Perity Trapping enabled, making sure thet ea trep 
occurrs. 


3. Meke sure error address bits ere set correctly. 


4. Write good parity without trapping. and make sure no trap 
eoccurrs when read. 


NOTE 


This test is run for parity memory which 
is not controlled by the same CSR as the 
program. 


SEQ 0068 
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2637 
26 


6.2.2.25 Test 36 Correction Code Test 


1. Write CSR with check bits to correct bit 0 of the first eddress 
in @ 16k benk from e 0 to a l with diag mode. 


. Write AUT with date of O's. 
Read AUT for correction of bit O from ea 0 to a il. 
. Repeat 1-3 for all 16 date bits. 


Repeat 1-4 for date of ones so that ea correction will occur 
from ea il to ea zero. 


This test checks to see that the EDC chip can correct Single Bit 
Errors for ell 16k data bits from a i to a O and vise verse. 


vi ® Ww WW 


NOTE 
This test is only run for the MSV11-J 





SEQ 0069 


— 


meme eee -—- -« 
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ae? 
5867 
2668 
a 
2671 6.2.2.26 Test 37 Check ECC Disable Test 
267 1. Write CSR with ECC disable, Diag mode, and SBE check bits 
| r+ of 000010. 
2876 2. Write AUT with data of zero's. This should write check bits to 
sore memory . 
679 3. Read AUT for data of zeros insuring no correction was made. 


This test is run on the MSV11-J only. 


5 NOTE 
eB 


oem St” 
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SEQ 0071 
2691 
269. 
26 
2394 
2656 
| S99 6.2.2.27 Test 41 Address to CSR on DBE Test 
3699 1. Write CSR with ECC disable, Diag mode, and Double Bit error 
3441 check bits of 010011 | 
a4 2. Write AUT with date of zeros creating a DBE. | 
S308 3. Read AUT to detect DBE and to clock address into CSR 
3306 4. Read CSR for correct address in bits 5-11. 
S308 5. Increment address by ik and repeat 1-4 until 16k is done. 
s3i0 This test insures that the correct address appears in CSR bits 5-11 on eae DBE 
29 
2318 NOTE 
2315 This test is run on a MSV11-J only. 
si 
18 
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6.2.2.28 


vu oO WS Ww 


——— ee eee eee 


MACRO YOS.02 Monday 07-Oct-85 16:57 Page 75 


Test 42 Extended Address to CSR on Error Test 
Write CSR with SBE check bits of 000010 with Diagnostic Mode. 
mite low address in a i6k bank with date of zeros creating a 


Clear the CSR. 

Read address to detect SBE. 

Read CSR for correct address and the SBE indicator bit 04. 
Enable CSR bit 14 to check the Extended address bits. 
Read CSR for correct address bits 


Repeat 1-7 with a test address that is the highest in a 16k bank. 


This test checks to see that the correct address bits apppear in the CSR. 
This is also repeated for the Extended Address function in the CSR. 


NOTE 
This test is only run for the MSV11-J 


SEQ 0072 


- ————— 


om ee eee lO ETE TTT TT LLL mm 
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6.2.2.29 Test 43 Write Byte Test 


1. Write CSR to Di mode with check bits of 001100. These 
correspond to date of zeros. 


2. Write first AUT with data of one in bit zero. The write 
effectively creates a SBE in byte 0. 


3. Clear the CSR 

4. Write byte 1 of the AUT with data of all ones. 
S. Read CSR to check for SBE indication. 

6. Write the CSR to Diag mode. 

7 


. Read the AUT to check for the correct data -- all ones in high byte 
and ell zeros in low byte. 


8. Read the CSR to check for correct check bits corresonding to the date 
read in (7). These check bits are 000110. 


9. Repeat (1)-(8) this time creating an error in byte 1 (2) and writing 
byte 0 in (4). 


This test checks to see that a SBE will be corrected during the read portion of the 
byte write and that correct chetkhi te will be generated on the write. 


j 


NOTE 
This test is only run for the MSV11-J 





eee ee eer eee een 
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6.2.2.30 Test 44 Shifting Checkbits through the CSR Test ' 
1. Write CSR to Dieg Mode to Enable Checkbit register. | 
Write CSR with check bits of 000001, ECC disable and Diag mode. | 


3. Write memory with date of zeros. This should write the check bits 
into memory. 


Complement check bits pattern and write CSR as in (2). 
Read CSR for complement check bit pattern. 
Read memory to read check bits written in (2) into CSR. 


esascerossessssssess 


pee 
UNrove@~oauea 


Read CSR for corret check bits written in (2). 
Shift check bit pattern and repeat (1-7) till CSR bits 5-10 are done. 


Complement check bit pattern in (2) and repeat (1-8) shifting ea zero 
through a field of ones. 


10. Repeat 1-9 for every 100 octal locations in 16k 


oo @owneofiwy es 


This test checks the ability to read check bits from the CSR to memory and beck. 
The test is done twice. Once shifting e field of a one thr ea field of zeros 
and a zero thr ea field of ones. This tests the Checkbit/Syndrome bit register 
end Check bit RAM‘’s. This test is done for every 100 octal locations in 16K. 


NOTE 
This test is only run for the MSV11-J 


—_— —— ee -_ 


CVMJABO MSV11-J MEMORY DIAG. MACRO YOS.02 ™cnday 07-Oct-85 16:57 Page 76 


SEQ 0075 
3042 
3043 
3044 
3045 
3046 : 
 s of4 6.2.2.31 Test 45 Syndrome Bits to the CSR on ea DBE Test 
9 . Write CSR with Dieg mode to enable Check/Syndrome bit Register. 
. Write CSR with DBE check bits of 110011 with Dieg mode. 
. Write memory with date of zeros creating ea DBE. 
5 . Clear CSR. 


Read memory to detect OBE. 

Reed CSR for Uncorrecteble error indicator. 

Write CSR to Dieg mode to read Syndrome bits into CSR. 
Read CSR for correct Syndrome bits of 111111. 


Repeat (1-8) with Muliple Bit Error check bits of 111100 and 
corresponding Syndrome Bits of 110000. 


oo onweoeeyweswaht 


This test checks the ability of the CSR to detect a DBE and read for the proper 


~ 


S$Sss 
SANNA AINS 
NQOUa 


Syndrome bits generated by the EDC chip. This test is then repeated with check 
bits corre ing to ea Multiple Bit error. 
NOTE 


This test is only run for the MSV11-J 


' 
' 
= a 


Ee oo - 
en 
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6.2.2.32 Test 46 Check Single Bit Errore with ECC Disabled Test 


1. Write CSR with check bits to correct bit 0 of the first eddress 
in @ 16k bank from a 0 to e 1 with diag mode and ECC “disabled. 


2. Write AUT with date of O's thus creating e SBE. 

3. Write the CSR to ECC disable. 

4. Reed AUT to detect SBE. 

5S. Check to see that no trap occured. 

6. Read CSR to see that uncorrectable error (CSR15) is set. 
7. Repeat 1-6 for all 16 date bits. 

8 


Repeat i-7 for date of ones so that e correction will occur 
from ea 1 to e zero. 


9. Repeat 1-8 om Cnenee 16 @ in st (3) the CSK is written to ECC Disable 
and BUS PBL (5) we check for traps. 


sasassssseseessscees 


This test checks to see thet SBE ere treated se uncorrectable errors with ECC 
Disable. The test is repeated 2 times, once with tr disebled and agein 
with it enabled. this is done for all 16 possible conditions. 

NOTE 


This test is only run for the MSV11-J 


ae pat et De ae ae ee ee ee ft be pe fee Pe 
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6.2.2.33 Test 47 NO CSR Update On SBE with exsisting DBE test 

Write the CSR to Dieg mode to enable Checkbit/Syndrome bit Register. | 
Write the CSR with OBE check bits of 110011 end Dieg mode. 
Write memory with dete of zeros creating e DBE. 

Write CSR with SBE check bits of 000010 and Diag mode. 

Write memory 4k ebove address in (3) creating e SBE. 

Cleer CSR. 

Reed memory with address in (3) to detect DBE. 

Reed CSR for correct eddress and Uncorrecteble error indicetor 
Read memory with eddress in (5) to detect SBE. 


nee co for SBE indicator and no change in DBE status in CSR 
in 


~ 
- 


oonroenewmwe®s w WW 


~ 
°o 


Thies test checks to see that no update will occur in the CSR with e SBE in 
memory when e DBE elready exists. 


NOTE 
This test is only run for the MSV11-J 
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} 


SEQ 0076 


6.2.2.34 Test 999 Null Test 


This is en instent return added to preserve the softwere structure. 


This test repleces eny reel tests when the APT E-Teble does not 
specify ea test to be run. 
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7.0 PROGRAM FEATURES 
7.1 Fest Dete Access Rates 


One of the main ereas of concern in testing memory in systems 

environments is speed. One of the prime reasons that system progrens 

like RSTS,IAS and MUMPS cen crash due to memory failures not 

detectable by memory diagnostics (0-124K,0-2 MEG,etc.) is beceuse of 

multiple NPR devices contending for the bus. After some deley «a NPR 

ya hag _asunes bus mester and does severe] memory trensfers et memory 
e retes. 


On the other hend most diagnostics wher writing readi and/or 
checking patterns spend most of their time fetching instructions and 
operends out of their progrem space and proportionally little time 
eccessing the memory under test. 


This diegnostic’s error detecting abilities have been optimized around 
the _——* design criteria of speed. To this end the following steps 
have been taken. 


7.1.1 Fast City 


Utilizetion of Memory Management Registers as Non Memory Bus, Non 
QBUS, Bipoler Memory. Since User Mode is only used for relocation 
and Bete Cece is never used, then subroutines cen be executed from 

VIPAR's, UDPAR‘s, KDPAR‘ s, SDPAR‘'s and with some Bit Pettern 
restrictions the UIPOR's, UDPDR's, KDPDR’s,. and SDPDR's. 


The program runs in Kernel mode and Patterns ere executed in 
Supervisor mode for mapping purposes. All core patterns and some MOS 
Petterns are subroutines t ere moved to this Bipoler region 
referred to in the program as Fast City. 


NOTE 


18-Bit PDP-11's cannot execute from the 
PAR's because their PAR's are only 12 
bits wing they elso have no Supervisor 
Mode. herefore, all petterns are 
executed in memory, using User Mode 
(reference Section 7.5). 


7.1.2 SOB‘s 


SEQ 0079 


CVMJABO MSV11-J MEMORY DIAG. 


3221 





-_ _ a a me ee ~~ —_ 


MACRO YOS.02 Monday 07-Oct-85 16:57 Page 61 


Utilization of the full PDP-11 Instruction Set to speed pettern 
elgorithms (principally the SOB). 


7.1.3 CACHE 
CACHE is used between pattern tests to decrease program pace times. 
CACHE can be defeated by the operator (reference section 2.4.3.1). 


7.2 Bank Zero Testing 


Bank Zero has been traditionally neglected by memory diagnostics for 
the following reeson. 


The vector space exists there and ALL traps must not access test 
pettern date. If the erea is tested the diagnostic must not use any 
treps, end it is egainst the rules for power to fail. 


Systems with Memory Management can overcome this because ell traps ere 
to Kernel Virtual space even if the power should fail (caution must be 
observed because power up goes to aeice eddress 24 (because the 
Memory Maenegement Unit comes up of 


However, Catch 22 is that the Corie is not APT compatible in this 
mode beceuse APT Accesses Physical Memory Locations. 


The PDOP-11/83 can over come this because the QBUS Map can fool APT. 


Sosause of the previous erguments + aa 7 does not relocete in 
true since of the word (i position independent code wes 

on Ron Cat least not on marneen)) + aan eather this program moves one 
e rer corer nee to es soneeasee?. his oneeyer the 

complete testing of Bank Zero or any other program spece or privileged 

space exactly es all other banks are tested. The conditional test to 

see if a is protected is complemented wi.en relocated). 


NOTE 
The progrem will relocate only in the 


first pess under APT; after this, the 
aes will remain fixed in Banks O and 


7.3 Memory Configuration Map 





SEQ 0080 


- ————  <ee 
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This is printed out Canaeietesy after else. Be pr: memory unless SW6 
is set (reference section 2.4.1). It can eal gr ingee et any leter 
time in Field Service Mode (reference section 2 
Example: 
MEMORY vol haa MAP 
2 = a o s 6 
012545670123456701284567012545670123456701234567012345670123 


ERRORS 
MEMTYPE EE EEE EE PPPPPPPPPPPPPPPPPPPPPPPPEEEEEEEEEEECEEEEEEEE! “EEEEEEE 
444424 AbA4, A4444448 


CSR oe 
PROTECT PP I I I 
1 1 1 1 1 i 
0 i 2 3 4 5 6 
456701 2345670123456 70123456 70123456 70123456 70123456 7012354567 

MEMTYPE EEEE 
CSR 
PROTECT 


Displeyed ere Banks 0-77 Octel (1 
Switch wes set (reference section 
shown. If this was an 16-Bit POP- ii 


“29,9 words). If the Fat Terminel 
2.4.1) then ell Banks (0-177) would 
(eg - 117235). only Banks 0-7 


The sizing routine could not write zeros and ones in Banks 
10 11, hence they ere marked as bad with X's 


ERRORS: 


MEMTYPE: 
se C- : are pemore Type E (MSV1il1-J), a syorke 10-37 are 
ormecy og V11-L/P) and Banks 40-77 ere memory type 
ECMSVil-J Banks 100-167 do not ym fl 


CSR: 





~ - ——_ 


TT TTT meme 
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3323 

33 Benks 0-7 ere essi to CSR arses 10-17 to -, 172102, 
end 20-37 to interleaved CSR's 2104 and 172106 and benks 
40-77 ere assigned CSR 17210 


| PROTECT: 


Banks 0 and 1 ere protected because they are program space 
Benk © end 1 can also be protected because they ere in the 
bottom 16K of en MSV11-L/P CSR. The protection is haat a | 


and ern e@ overshadows MSV11-L/P protection. Banks 0 
; end 1 will not tested until the program relocates. 
7.4 Everything You've Always Wanted To Know About SUPERMAC ... 
5 
5 


SUPER-MAC is eae set of structured eregrent ite macros that ellows 
progrems to be written in eae high level, easily understood language. 
As ea generel rule, most SUPER-MAC statements can be _ single-line 
statements or multiple-line (nested) block statements. A single-line 
statement must be completed on one source line; no continuation lines 
ere allowed. Single-line statements should be as short and simple as 
possible. Comments ~ & elso be included on a source line. All the 
rel rules, conditi 

Spacing on a _ coutes Ine is very importent. tthe elements 

should be seperated by ae comme or a space. Tabs should never be used 





ons, etc., that govern MACRO-11 also govern 





for speci For exemple: The expression A+B is interpreted 

different Sank Dan th + 6. iad 
All the conditionel statements can be written as multiple-line nested 
blocks. Each level of nesti within e block must be terminated with 
en associated END statement. ach level of nesting should be indented 

two spaces. 

; oer Paap tin mecros or ~ spay Ri instructions may ncluded 
progrem if desired. ng aid, if the 2" syabol ists: is 
defined. it will cause a. a code a5 o ighele to listed. All 
5 er pane must begin wi the macro call SMACIT. Thies call initializes 
336 p. + egel POP-11 source and destination operands are legal 


7 eee 


SEQ 0082 
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le Source File - 
ABS 


-ENABL AMA 

-MCALL .SUPER 

. SUPER 

sLST$$=0 
TS=40 


ocoooooooeoe 


IF A IS TRUE 
3.0 

END ;OF IF A 
IF 6 IS FALSE 
MO E 


B 
IF A EQ B THEN LETC := D 
IF ALT 


— a 





SEQ 0065 


— a 


« ee 
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END ;OF IFB A 
IF RESULT Is €@ 
MOV A, 
END ;OF IF RESULT 
IF BITS = IN A 
=. 
gor BITS 
a ITs Torr. IN A 


V 
END ;OF IF BITS 
,ON.ERROR IS LIKE AN IF STATEMENT ON THE C-BIT 
ON. EXAMPLES 


“ES 

FOR I := -5 TO 23 
END hg FOR I 
F :*= OTTO 140 BY 4 
RO) 

END ;OF FOR RO 

FOR := 133 DOWNTO 3 BY 2 

ADD A,B 

END ;OF FOR I 
;BEGIN EXAMPLES 

BEGIN ALPHA 
FOR RO := OTO 167 

ACRO).B 
IF 6 LT O THEN LEAVE ALPHA 
END ;OF F RO 
FOR :=* 400 TO 567 
IF 6 GE O THEN LEAVE ALPHA 
END ;OF FOR RO 

END PHA 
;$RETURN EXAMPLES 

$RETURN 





SEQ 0084 


ee eee er ee 
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IF 
B THEN LET C := 0D 


8 
Cc 
9) 
2 
END ;OF CASE RO 
.END 
7.4.2 Soseie Listing File Cwith No Enponded Macros) - - 
-MAIN. MACRO M1111 01-APR-79 16:41 PAGE 2 
1 000000 -ENABL ABS 
2 -ENABL AMA 
3 -MCALL .SUPER 
4 000000 . SUPER 
5 sLST$$=0 
6 000040 BITS=40 
7 000000 000000 A: 0 
8 000002 000000 B: 0 
9 000004 000000 C: 0 
10 000006 000000 D: 0 
11 000010 000000 E: 0 
12 000012 9000000 F: 0 
13 000014 000000 G: 0 
14 000016 000000 H: 0 
15 000020 000000 I: 0 
16 000022 9000000 J: 0 
-MAIN. MACRO M1111 01-APR-79 16:41 PAGE 3 
18 ;LET EXAMPLES 
19 000024 LET RO := A 
20 000030 LET B := C + OD 
21 000044 LET E :=* Fe 1 
22 9000056 LET G :* He 2 
23 000072 LET J:2= J+ O 
24 000100 LET A :B= 6 
25 ;IF EXAMPLES 
0001 IF A IS TRUE 
27 000114 012737 000023 000006 Vv 23,0 
28 0001 END ;OF IF A 
29 0001 IF B IS FALSE 
30 000130 012737 000034 000010 MOV 34,€ 
31 0001 END ;OF 
32 000136 IF A EQ 
33 000154 IF ALT 8B 
34 000164 013737 000004 000006 MOV C.O0 
35 000172 ELSE 


SEQ 0085 
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3532 36 000174 013737 000010 000006 MOV €,0D 
3533 37 000202 ;O0F IF A 
3534 38 000202 IF A EQ B AND C NE D 
3535 39 000222 013737 000012 000014 MOV. F.G 
3 40 000230 END ;OF IF A 
7 41 000230 IF A EQ B OR C NE OD 
42 000250 013737 000012 000014 MOV. F.G 
39 43 000256 END ;OF IF A 
44 000256 IFB A EQ 8B ANDC EQ 1 
45 000276 013737 900016 000022 MOV HJ 
46 000304 ELSE 
47 000306 013737 000010 000022 MOV J 
48 000314 END 108 IFB A 
5 49 000314 IFS A €Q B ANDB ce@ 1 
S50 000334 013737 000016 000022 MOV HJ 
51 000342 ELSE 
52 000344 013737 000010 000022 MOV € 
53 000352 END ;OF IFB A 
54 000352 IF RESULT IS EQ 
55 000354 013737 000000 000002 
END ;OF IF RESULT 
57 IF BITS SET.IN A 
000372 013737 000002 000004 MOV C 
5 59 END 40F IF BITS 
60 000400 IF BITS OFF.IN A 
61 000410 013737 000004 000006 V 
62 000416 END ;OF IF BITS 
63 ;ON.ERROR IS LIKE AN IF STATEMENT ON THE C-@IT 
; 64 ;ON.ERROR EXAMPLES 
5 65 000416 ON. ERROR 
66 000420 013737 000000 000002 MOV A.B 
3 67 000426 ELSE 
3 68 000430 013737 000004 000002 MOV 
5 69 000436 END 2 0F ON. ERROR 
70 000436 ON. NOERR 
71 000440 013737 000004 000002 MOV. C.B 
72 000446 ELSE 
73 000450 013737 000000 000002 MOV A,B 
70 74 000456 END ;OF ON.NOERROR 
357 
13 .MAIN. MACRO M1111 01-APR-79 16:41 PAGE 3-1 
78 
? 75 000456 ON.ERROR THEN LET A :B= B 
7 76 ;FOR EXAMPLES 
? 77 000466 FOR I := -5 T0 23 
7 78 000474 005237 000000 INC A 
35ac 79 000500 END ;OF FOR I 
80 000514 FOR RO := OTTO 140 BY 4 
: 81 000516 005360 000000 DEC aACRO) 
82 000522 END ;OF FOR RO 
3 83 000534 FOR I := 133 DOWNTO 3 8Y 2 


SEQ 0086 
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i 


84 000542 063737 000000 000002 ADD A,B 

85 000550 END ;OF FOR I 

86 ;BEGIN EXAMPLES 

87 000566 BEGIN ALPHA 

88 000566 FOR RO := OTTO 167 
89 000570 116037 000000 000002 MOVB C 
90 000576 wf B Lr on” THEN LEAVE ALPHA 
91 000604 ND OF 

92 000614 0 he TO S67 
93 000620 Ore ° a LEAVE ALPHA 
94 END OF FOR RO 
95 000636 END ALPHA 

96 ; $RETURN EXAMPLES 

97 000636 $RE TURN 

98 000640 $RETURN ERROR 

99 000644 $RETURN NOERROR 
100 ;CASE EXAMPLES 
101 000650 013700 000000 V A,RO 
102 000654 CASE RO 
103 000000 A 
104 000002 8 
105 000670 000004 C 
106 000672 000006 0 
107 000674 000010 E 
108 000676 000012 F 
109 000700 END ;OF CASE RO 
111 000001 END 

" nad ne S Listing File (with Expanded Macros) - - 
aaeRo Mil11 01-APR-79 16:10 PAGE 2 

1 000000 .ENABL ABS 

> -ENABL AMA 

3 “MCALL . SUPER 

4 000000 SUPER 

5 000000 LST$$=0 

é 000040 BITS=40 

7 000000 000000 A: 0 

8 000002 000000 B: 0 

9 000004 000000 C: 0 

10 000006 000000 OD: 0 

11 000010 000000 E: 0 

12 000012 000000 F: 0 

13 000014 000000 G: 0 

14 000016 000000 H: 0 

15 000020 000000 I: 0 

16 000022 000000 J: 0 

_MAIN. MACRO M1111 01-APR-79 16:10 PAGE 3 


SEQ 0087 
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16 
19 000024 

000024 
20 000030 
21 


22 000056 
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013700 


013737 
063737 


013737 
005237 
013737 
062737 
062737 
113737 


005737 
001403 
012737 


005737 
001003 
012737 
023737 
001003 
013737 
023737 
002004 
013737 


000403 
013737 


001403 
013737 


000012 


16:57 Page 89 


000014 


;LET EXAMPLES 
LET RO :* A 


IF A IS TRUE 
T & 
LO: 


V 34,€ 
END ;OF IF B 
Li: 


IF A EQ B THEN LET C : 


Le: 


L3: 


L4: 


SEQ 0088 


ee 


eee ele 


CVMJABO MSV11-J MEMORY DIAG. 


ee 
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SSSSSESEKHSSSLAUsUNHoe 


aad 
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023737 
001404 

023737 
000246 001403 


013737 


123737 
001010 
023727 
001004 
013737 
000403 
013737 


001004 
013737 
000403 
S52 000344 013737 


001003 
013737 
032737 


001403 
013737 


032737 


000000 000002 
000004 000006 


000012 


000002 


000040 


000014 


LS: 
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L6: 


L7: 


L1i0: 


Lil: 


Lie: 


L13: 


Li4: 


LiS: 


SEQ 0089 


IF A EQ B OR C NE O 
CMP 


MOV F.G 
END ;OF IF A 


IF6B A EQ BAND CEQ 1 


r 
Lo QS 
° 

ray 


MOV €E,J 
END ;OF IFB A 
IFB A EQ 6 ANDB CEQ 1 


MOV €E,J 
END ;OF IFB A 
IF RESULT IS EQ 
BNE L14 

MOV A.B 
END ;OF IF RESULT 
IF BITS SET.IN A 
BIT BITS.A 
BEQ L15 

MOV. 8.C 
END ;0F IF ®ITS 
IF @ITS OFF.IN A 
BIT BITS,A 


a 


ee 


NO OTE TEE TE LL LL 
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SEQ 0090 


3745 61 000410 013737 000004 000006 MOV C.O 
ps 62 000416 END ;OF IF BITS 
3748 000416 L16: 
3749 63 ;ON.ERROR IS LIKE AN IF STATEMENT ON THE C-8IT 
;ON.ERROR EXAMPLES 
3751 65 000416 , 
3 000416 103004 ece 117 
66 000420 013737 000000 000002 MOV A,B 
67 000426 ELSE 
5 000426 000403 BR L20 
000430 Li?: 
68 000430 013737 000004 000002 MOV C.B 
760 69 000436 END ;OF ON.ERROR 
76 000436 L20: 
7 70 000436 ON. NOERROR 
ie 
765 MAIN. M1111 O1-APR-79 16:10 PAGE 3-2 
i 
768 000436 103404 BCS L21 
7 71 000440 013737 000004 000002 MOV. C, 
770 72 000446 ELSE 
77 000446 000403 BR L22 
77 000450 L2i: 
77 73 000450 013737 000000 000002 MOV A.B 
774 74 000456 END ;0F ON.NOERROR 
775 000456 L22: 
77 75 000456 ON.ERROR THEN LET A :B- B 
77 000456 103003 BCC L23 
77 000460 113737 000002 000000 MOVE B.A 
77 000466 L23: 
7 76 ;FOR EXAMPLES 
3 TT oesee 012737 177773 000020 aA = 
7 78 000474 005237 000000 A 
785 79 000500 END OF FOR I 
u 023 7 $00080 000023 ow I, 23 
7 000512 003770 BLE 80 
? 000514 £0: 
80 14 FOR RO := OTO 140 BY 4 
7 14 005000 ae CLR RO 
79 81 16 «35360 000000 DEC ACRO) 
794 82 000522 END ;OF FOR RO 
795 000522 062700 000004 ADD 4,RO 
7% 000526 020027 000140 CMP RO, 140 
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| SEQ 0091 
000532 003771 BLE B1 
000534 El: 
85 000534 FOR I := 133 DOWNTO 3 8Y 2 
012737 000133 000020 MOV 133.1 
84 063737 00000 ocococe **" ADD A.B 
eS goosse END ,0F FOR I 
000550 162737 000002 000020 sug 2.1 
000556 023727 000020 000003 che I, 3 
000564 002366 BGE B2 
000566 E2: 
BC ;BEGIN EXAMPLES 
1810 87 000566 i BEGIN ALPHA 
: es oooses FOR RO := O TO 167 
000566 005000 CLR RO 
f 000570 B4: 
f 89 000570 116037 000000 000002 MOVB ACRO),8 
90 000576 IF 8 LT © THEN LEAVE ALPHA 
t 76 005737 000002 TST 8 
83 000602 002415 
f 91 000604 END ;0F FOR RO 
000606 020027 000167 CMP RO, 167 
000612 003766 BLE 64 
000614 E4: 
92 000614 FOR RO := 400 TO S67 
000614 012700 000400 MOV 400,RO 


-MAIN. MACRO M1111 01-APR-79 16:10 PAGE 5-3 









[ 000620 B5: 

; 93 000620 IF 6 GE O THEN LEAVE ALPHA 

; 000620 005737 000002 

| ou Seeees Sean 

: ee 

? 3771 

183 ES: 

584 95 g3 END ALPHA 
H 

: 96 ;$RETURN EXAMPLES 

i: a. on ae 

? 000261 

r 000207 

: o9 Googe OO 

? 000207 
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SEQ 0092 
363g 100 ;CASE EXAMPLES 
101 000650 013700 000000 MOV A,RO 
38 102 000654 CASE RO 
368 000654 01 MOV RO, -C(SP) 
000656 006316 ASL 
000660 004737 000700 JSR PC.L24 
103 000664 000000 A 
104 000666 000002 B 
' 105 00067C 000004 c 
000672 000006 ) 
107 000674 000010 E 
108 000676 000012 F 
109 900700 END ;OF CASE RO 
000700 L24: 
000700 062616 ADD (SP)-, 
000702 013646 MOV @(SP)+,-CSP) 
sia 000704 004736 JSR PC, a(SP)- 
{ 70 111 000001 END 
7 
He 7.5 Memory Management Mapping 
$875 7.5.1 Memory Management Mapping For The 11/83 - 
f. 77 PAR SUPERVISOR KERNEL USER 
t 19 0 Program Program Ost Bk/Fst Mem 
{ ; i Program Program Src Bk/Fst Mem 
se 2 Program Program Src Bk/Fet Mem 
T 3 Test Aree Program Src Bk/Fst Mem 
4 Test Area Program Ost Bk/Fet Mem 
5 Test Area P am Dst Bk/Fet Mem 
5885 6 Test Area Map to CSR's Ost Bk/Fst Mem 
it 7 Perif Page Perif Page Ost Bk/Fst Mem 
TT 
1 7.5.2 Memory Management Mapping For QBUS-11's With Supervisor Mode (eg 11/238) - 
ean SUPERVISOR KERNEL USER 
0 Progrem Program Ost Bk 
i Program Program Sre Bk 
2 r Progrem Src Bk 
3 Test Aree Program Sre Bk 
4 Test Area Program Dst Bk 
5 Test Area Program Dst Bk 
é Test Area Map to CSR's Dst Bk 
7 Perif Page Perif Page Dst Bk 





~ —— — ———— 
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7.5.3 Memory Menegement Mapping For QBUS-11's W/o Supervisor Mode (eg 11/235) - 


PAR KERNEL USER 

C Program Program/Dst Bk 
Program Program/Src Bk 

2 Program Progrem/Src 

3 Program Test Area/Sre Bk 

4 Program Test Aree/Dst Bk 

5 Progrem Test Aree/Dst Bk 

6 Map to CSR's Test Area/Dst Bk 

7 Perif Page Perif Page/Dst Bk 


SEQ 0095 
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SEQ 0094 
LIST TOC 
“ENABL ABS 
AMA 
CUHJAO. SML IS THE SUPER.MAC SOURCE AND IS RELEASED WITH 
MCALL SMACIT ALL THESE MCALL STATENENTS, B aT ERIN "ERETL tmp se arte 
"MCALL .IFOPR..IS,.GENBR, .OPADD, .OP ore CLEAR. geo OL EARB arte 
"MCALL RNE,REQ.RLT,RGE.RGT,RLE Ree ait .RLOS, ants. RLO,ACS,RCC 
MCALL IF. _OR, .IFARI, LEAVE, .GOTO, , THEN, ELSE, OeILe {CASE 
"MCALL FOR.T "REPEAT .UNTI 6 
"MCALL $$END, LEAVE, JUMPTO,GOTO, PUSH, POP,LE 
"MCALL .SIMPLE, .ARITH, ORB. ANDB. IFB,UNTILB, WHILEB, ON. ERROR, ON. NOERROR 
“MCALL SAL  SRETUAN 
.NLIST TTM ;I WANT FAT PAPER! 
"LIST MC.SYM ;LIST MACRO CALLS, SYMBOL TABLE 
"NLIST MO.CNO,ME ;D0N'T LIST MACRO DEFS & CONDITIONALS & EXPANSIONS 
LST8$= 0 OCP INED. to LIST SUPERMAC EXPANSIONS 
= 163000 T SYSMAC SWI 





3U CHES 
$TN= 1 ;FIRST TEST NUMBER TO ONE(1) 


—— —— 





-—— ——o 


; ALL 


. SBTTL 


DEF INE 


ENTRIES HERE MUST 
;TRAP TABLE “$TRPAD” CNEAR 
;@TRAP DEFINITIONS 
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TRAPS 
HAVE A CORRESPONDING ENTRY IN THE 
PROGRAM). 


cage 98 


END OF 


ee —_ 


: MERE IS HOW TRAPS WORK IN THIS PROGRAM 


FALL TRAPS EXECUTE A 


“oe SYMBOLIC LOCATION “STRAP 


SAT STRAP THE es PICKS UP THE a m 24: OF THE TRAP INSTRUCTION 


sAND INDEXE WHICH SENDS THE PROGRAM TO 


st 


TABLE AT LOCATION * 


“TRAP” INSTRUCTION WHICH TAKES THE PROGRAM 


NTO A RPAD“ 
THE SPECIFIC ROUTINE TO HANDLE THAT SPECIFIC TRAPS TASK. 


; THE ULTIMATE DESTINATION OF A TRAP INSTRUCTION CAN BE GUESSED AT AS FOLLOWS 


; EXAMPLE : 


SAVREG= 
RESREG= 


KERNEL = 


ENERGIZE =104420 


A DOLLAR SIGN TO THE SYMBOLIC 


NOP 
KERNEL 
NOP 


ADD 
IN THIS CASE THE CRF 
AT LOCATION 32546 YOU FIND THE ROUTINE $KERNEL 


NOTE THAT CRF SYMBOLS ARE TRUCNATED TO 6 CHARACTERS 


SYMBOLIC 
REMEMBE 


NAMES GREATER THAT 6 
R WHAT THEY MEAN! 


sENTER KERNEL MODE 


CHARACTERS ARE USED SO I CAN 





rr GOOD TRAP meth a RETURN ve ml “RTI” INSTRUCTION 


DEENERGIZE=104421 
104422 


KMAP = 
CACHON= 


104423 


CACHOF F = 104424 


3s TYPE DECIMAL 


bh odd 
OCTAL 






ayo (WITH LEADING ZEROS) 
.? NO LEADING ZEROS) 


TH 
1; TYPE BINARY CASCII) NUMBER 


3:;GET SOFT-SWR SETTING 
3;TEST FOR CHANGE IN SOFT-SWR 


Y TYPEIN 


va tty TYPEIN CHARACTER ROUTINE 
ROUTINE 


STRING 


+ READ AN OCTAL NUMBER FROM TTY 
;sREAD A DECIMAL NUMBER FROM TTY 


;s;SAVE RO-RS ROUTINE 
;sRESTORE RO-RS ROUTINE 


;ENTER KERNEL MODE 
; TURN ON MEMORY MANAGEMENT € TRAPS 


; TURN OFF 


tare! creel & TRAPS 


;MAP KERNEL 1 T 


;TURN ON CACHE 
;TURN OFF CACHE 


SEQ 0095 


NAME AND CHECK THE CRF FOR SOMETHING CLOSE 
HAS $KERNE LISTED AS 032546 


ee ee ae ee 
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DEFINE TRAPS SEQ 0096 
4000 
4001 104425 LOADCSR=104425 ;LOAD CORRECT CSR 
3008 104426 READCSR=104426 sREAD CORRECT CSR 
4004 104427 PERRO1= 104427 ;PROGRAM DETECTED ERROR 
4005 1044 PERRO2= 1044 ;PROGRAM DETECTED ERROR 
4006 104431 PERROS= 104431 ;PROGRAM DETECTED E 
4007 104432 PE = 1044 ;PROGRAM DETECTED ERROR 
4006 1044353 PERRO7= 104433 ;PROGRAM DETECTED ERROR 
4009 1044 PERR10= 1044 ;PROGRAM DETECTED ERROR 
4010 104435 1il= 104435 :PR DETECTED ERROR 
| 4011 1044 PERR12= 1044 : DETECT 
rete | 104437 PERR13= 104437 sPROGRAM DETECTED 
1 104440 PERR14= 104440 ;PROGRAM DETECTED ERROR 
4014 104441 PERR1S= 104441 ; DETECTED ERROR 
4015 104442 PERR16= 104442 ; TECTED ERROR 
4016 104443 PERRi7= 1044435 ;PROGRAM DETECTED ERROR 
4017 104444 RR2O0= 104444 ;PROGR TECTED 
4016 104445 PERR21= 104445 ;PROGRAM DETECTED ERROR 
4019 104446 PERR22= 104446 ;PROGRAM DETECTED E 
4020 104447 PERR23= 104447 s;PROGRAM DETECTED ERROR 
4021 104450 PERR24= 104450 ;PROGRAM DETECTED 
res 104451 RR2S= 104451 ;PROGRAM DETECTED ERROR 
402 104452 RR26= 104452 sPROGRAM DETECTED 
4024 104453 PERR27= 104453 ; PROGR TECTED ERROR 
4025 1044 RR3O= 104454 ;PROGRAM DETECTED ERROR 
4026 104455 PERR31= 104455 ;PROGRAM DETECTED ERROR 
4027 1044 RR32= 104456 sPROGRAM DETECTED 
4028 104457 PERR33= 104457 sPROGRAM DETECTED OR 
40 104460 RR34= 104460 ;PROGRAM DETECTED ERROR 
40 104461 PERRSS= 104461 ;PROGRAM DETECTED 
4031 104462 PERR36= 104462 sPROGRAM DETECTED ERROR 
4032 104463 RR37= 104463 ;PROGRAN DETECTED ERROR 
4035 104464 PERR40= sPROGRAM DETECTED ERR 
4034 104465 PERR41= 104465 ;PROGRAM DETECTED ERROR 
4035 1044 PERR42= 104466 sPROGRAM DETECTED ERROR 
4036 104467 PERR43S= 104467 ;PROGRAM DETECTED ERROR 
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DEFINE TRAPS SEQ 0097 

4037 
40 04470 COIS= 10447 ;DISABLE ECC 
4039 104471 ECC101S=104471 ;DISABLE ECC ON 1 SELECTED CSR 
4040 104472 ECCINIT=104472 ; INITIALIZE ALL 
4041 104473 ECCLINIT=104473 ;INITIALIZE 1 SELECTED ECC C 
404 104474 CBCSR= 104474 {WRITE GENERATED CHECKBITS IN ALL CSR'S 
404 104475 CBICSR= 104475 ‘WRITE GENERATED CHECKBITS IN 1 SELECTED CSR 
4044 104476 WASSBE= 104476 ;WAS THERE A SBE ON ANY CSR? 

| 4045 104477 WAS1SBE=104477 ;WAS THERE A SBE ON 1 SELECTED CSR? 

4046 104500 WASDBE= 104500 ;WAS THERE A DBE ON ANY 

| 4047 104501 WAS1DBE=104501 ;WAS THERE A DBE ON 1 SELECTED CSR? 
4048 104502 CLRCSR= 104502 ;CLEAR ALL CSR'S 
4049 104503 CLRICSR=104503 ;CLEAR 1 SELECTED CSR 
4050 104504 CHKDIS= 104504 ;DISABLE ECC & WRITE CHECKBITS FROM ALL CSR‘S 
4051 104505 CHK101S=104505 ;DISABLE ECC & WRITE CHECKBITS FROM 1 SELECTED CSR 
4052 104506 ENASBE= 104506 ;ENABLE TRAPS ON SBE'S FROM ALL CSR’S 
405 104507 ENA1SBE=104507 ;ENABLE TRAPS ON SBE‘S FROM 1 SELECTED CSR 
4054 104510 TSTREAD=104510 :TEST LOC (R1) & TST FOR SBE (WITHOUT FETCHES) 

5 104511 INVALID=104511 SINVALIDATE BACKGROUND PATTERN ON “BANK” 

4056 104512 ERRGEN =104512 ;CHECK ERROR ADDRESS 
4057 104513 CBREG =104513 sENABLES CHECKBIT REGISTER 
4058 104514 SYNREG =104514 ;ENABLES SYNDROME BIT REGISTER 


— ne SSeS SS LT —__— 


Serine. BASIC POP11 Pil st 


4061 
2068 


177570 
177546 


ee ee ee 
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-SBTTL DEFINE BASIC PDP11 STUFF 


Be ~ Aae* ADDRESS OF THE siee POINTER 
2000 sFIRST ADDRESS OF THE STACK 


RERSTK= STACK a RNEL 
STK= 740 ; ;SUPERVISOR STACK 
USESTK= 700 ;:USER STACK 
= ;:BASIC DEFINITION OF ERROR CALL 
SCOPE =IOT ;;BASIC DEFINITION OF SCOPE CALL 
PSW= 177776 33 SSOR STATUS WORD 
sSTKLMT #177774 :3STACK LIMIT REGISTER 
= 1777 3 sPROGRAM INTERRUPT REQUEST REGISTER 
DSWR= 177570 a) ARE SWITCH ws TER 
DDISP= 177570 ; sHARDWARE DISPLAY REGISTER 
LKS= 177546 ; LINE CLOCK (KW11-L) STATUS REGISTER 
LOnSOCeL 4 aes DEFINITIONS 
il ;:;CODE FOR HORIZONTAL TAB 
ie 12 ; 1 CODE LINE FEED 
CR= 15 ;:;CODE CARRIAGE RETURN 
CRLF = 200 ;:CODE FOR CARRIAGE RETURN-LINE FEED 
MFPT= 7 ;;CODE FOR PROCESSOR TYPE INSTRUCTION 
;*#GENERAL PURPOSE REGISTER DEFINITIONS 
:SP=R6 3:STACK POINTER 
;KSP «SP “te ;KERNEL STACK POINTER 
SSP=SP ; s SUPERVISOR STACK on 
USP=SP ; USER STACK POINT 
;PC*R7 ; sPROGRAM COUNTER 
3#"SWITCH REGISTER” SWITCH DEFINITIONS 
SWiS= 100000 
SW14= 40000 
SW13= 
SWi2= 10000 
SWil= 4000 
SW10= 2000 
SW9= 1000 
SW8= 400 
SW7= 200 
SW6= 100 
SW5= 40 
SW4= 
SW3= 10 
SW2= 
SWi= 2 
SWO= i 
geoera g? DEFINITIONS (BITOO TO BIT15) 
BIT14= 40000 
BITi3=< 
BITi2= 10000 
BITiil= 4000 
BIT10= 000 
BIT9= 1000 
BIT8= 400 





SEQ 0098 


CVMJABO MS 
DEF INE BAS 


Pa hFHDA RAR L&E 
eetereyeteretetetet 
SSSusune 


POP 11 


-J MEMORY DIAG. 
1 STUFF 


000100 


177766 


177572 


172516 


177600 
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BIT7= 

BIT6= 100 
BITS= 

BIT4= 

BIT3S= 10 
BIT2= 4 
BITi= 2 
BITO= 1 


+ P tall TRAP — ADDRESSES 

OUT AND OTHER ERRORS 
: sRESERVED AND ILLEGAL INSTRUCTIONS 
s TBITVEC=14 7 " BIT 


3; TRTVEC= 14 33 TRACE Line 
;BPTVEC= 14 ; ;sBREAKPOINT TRAP (CBPT) 
IOTVEC= 20 : s INPUT /OUTPUT TRAP CIOT) *«eSCOPEss 
PWRVEC= 24 ;;POWER F 
VEC= 30 ‘a TRAP CEMT) #eERRORes 
TRAPVEC=34 ot 
TKVEC= 60 s3TTY KEYBGARD VECTOR 
;TPVEC= 64 337 oie PRINTER VECTOR 
Pes 100 ;;LINE CLOCK (KW11-L) VECTER 
CHVEC=11 ;:CACHE ERROR INTERRUPT VECTOR 
PARVEC =CACHVEC 
sPIRQVEC=240 ; 3 PROGRAM Pah ane a REQUEST VECTOR 
MMVEC= 250 ; sMEMORY MANAGEMENT VECTOR 
TTL DEFINE CACHE REGISTERS 
RR = 177744 ;:CACHE ERROR REGISTER 
RL = 177746 ; sMEMORY TROL 


R 
MA 177 REGISTER 
sHITMIS = 177752 ;:HIT MISS REGISTER “1” IMPLIES HIT IN CACHE 
DATARG = 177754 ;;DATA REGISTER 


-SBTTL DEFINE “ REGISTERS 
CPUERR = 177766 ;CPU ERROR REGISTER HOLDS CONDITION THAT CAUSED 


-SBTTL DEFINE MEMORY MANAGEMENT REGISTERS 
;#MEMORY MANAGEMENT STATUS REGISTER ADDRESSES 


MMRS= 172516 


;#USER "I" PAGE DESCRIPTOR REGISTERS 
UIPDRO= 177600 


;UIPORI= 177602 
;VUIPOR2= 177604 
;VIPOR3S= 177 

; VUIPDR4= 177610 
;UIPDRS= 177612 
; UIPDR6= 177614 
; UIPOR7= 177616 

;#USER "D" PAGE DESCRIPTOR REGISTORS 

; UOPDRO= 177620 
; UDPOR1= 177622 
; UDPOR2= 177624 


SEQ 0099 


SeFINE EMORY 


-J MEMORY DIAG. 


MACRO 


MANAGEMENT REGISTERS 


177676 


172200 


172240 


172246 


172252 
172254 
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“I” PAGE ADDRESS REGISTERS 


sPATTERN PROGRAM SPACE 
;PATTERN PROGRAM SPACE 


“D”" PAGE ADDRESS REGISTERS 


;PATTERN PROGRAM SPACE 
sPATTERN PROGRAM SPACE 
sPATTERN PROGRAM SPACE 
;PATTERN PROGRAM SPACE 
sPATTERN PROGRAM SPACE 
:BATTERN PROGRAM SPACE 

TTERN PROGRAM SPACE 

;PATTERN ‘PROGRAM SPACE 


*SUPERVISOR "I" PAGE DESCRIPTOR REGISTERS 


; UOPORS3= 177626 
; UDPOR4 = 177630 
sUDPORS= 177632 
; UDPDR6= 177634 
; UDPOR7= 177636 
3*USER 

FASTCITY=UIPARO 
UIPARO= 177640 
UIPARi= 177642 

PAR2= 177644 
UIPAR3S= 177646 

PAR4= 177650 
UIPARS= 177652 

IPAR6= 1776 
;UIPAR7= 177656 

R 
UDPARO= 177660 
sUDPARi= 177662 
;UDPAR2= 177664 
; UDPAR3= 7 
; UDPAR4= 177670 
;UDPARS= 177672 
; UDPAR6= 177674 
UDPAR7= 177676 
3 

SIPORO= 172200 
sSIPDRi= 172202 
:SIPOR2= 172204 
;SIPDR3= 2 
;SIPDR4= 172210 
;SIPORS= 172212 
;SIPDR6= 172214 
;SIPDR7= 172216 
: SOPDRO= 2 
;SDPDR1i= 172222 
:SDPDR2= 7222 
; SOPOR3= 172226 
;SDPDR4= 1722350 
;SOPORS= 172232 
; SOPDR6= 172234 
3 SDPOR7= 172236 

SIPARG 7224 
;SIPARL= 172242 
;SIPAR2= 722 
SIPARS= 172246 
;SIPAR4= 172250 

SIPARS= 72252 

SIPAR6= 172254 
;SIPAR7= 172256 


;#SUPERVISOR “D”“ PAGE DESCRIPTOR REGISTERS 
172220 


:;TEST AREA 
sTEST AREA 
; TEST AREA 

;TEST AREA 





SEQ 0100 
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ee ean MANAGEMENT REGISTERS _ 
/eSUPERVISOR *D" PAGE ADDRESS REGISTERS 


2 


bet tye tr 


Saas aRHsSS 


Hetty tet ttt aN 
ww - 


oh ne 


PPSPSSSSHSSSHSSSHSSSS SHS HSS SHS SHSHSHSHHHSHSHHHHHSHHHSHSHSSHHSHEDDD 
w 


172260 


172272 
172274 
172276 


1723500 





172276 


eee * PAGE DESCRIPTOR REGISTERS 


172316 


;#KERNEL “D” PAGE DESCRIPTOR REGISTERS 
172320 


172376 


SEQ 0101 


an 


™ —- 


O00 oy 


‘ 


yh Peer rrrerHOOOOCOOC 
- 9 OS~IPUSWRYO 


PPP OPSSEESSaEESSEEEESESSDHLDDEDEHDDSDSSDHSSESD 
o 


Buse Oe ak aamatadadeahkndadndnadand 
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-BUS MAP REGISTERS 





Tre LOMER 16 Bie OF IME TaD REGISTERS ARE LABELED ‘MAPLXx: 
& 
; UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED ‘MAPHXX: 


; 


: 
ws 
Ssesepeepeepeeuenpeeaeeseeepeuaeaaepeeaepeaeaepeuepenpeuaeepeepeupaeaueeeeeas 


SEQ 0102 


Cc 





DEF INE 
34 


343 


~ 


a 
a 
a 
8 


és 
i 


Ble 


SRR DRREDPHERHAD AMD 


AOUaun 


VMJABO MSV11-J 
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MAP REGISTERS SEQ 0105 
sMAPL33 = 170354 
5 = 170356 
sMAPL34 = 1703560 
5 = 170362 
sMAPLSS = 170564 
sMAPHSS = 170366 
sMAPL36 = 170370 | 
sMAPL37 = 170374 | 
sMAPHS7 = 170376 | 
.SBTTL DEFINE SOFTWARE SWITCH € DISPLAY REGISTERS 
000174 OISPREG=174 
000176 SWREG= 176 
.SBTTL DEFINE CONTROL STATUS REGISTERS 
172100 CSRADD-172100 


-SBTTL OEFINE PARAMETERS 
FIRST =60000 sSTART OF THE 16K TEST PATTERN AREA 
LAST=157776 ;END OF THE 16K TEST PATTERN AREA 
SIZE =40000 ;SIZE OF THE 16K TEST PATTERN AREA (FOR SOB INSTRUCTIONS) 


Oe SePeGeGeGeGeGeGeGedeGaeGeGseGeGeGsGeGseHeGeGeGeGeGeGeGseGeGseGeGeGaHeHeds 
-NLIST MO ;D0N‘T NEED TO SEE THEM ANY MORE 


AT 


nnd} MEMORY DIAG. 


000177 


900137 008670 
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—_ SEQ 0104 


-SBTTL TRAP CATCHER 





WORD 0,0 . 
"REPT 177 ;.WORD .+2,HALT : 
.SBTTL ACT11 HOOKS | 


;¢THE HOOKS aeons? BY ACT11 ARE DEFINED AND SETUP BELOW: 
3¢ DEFINITIONS: 








8 1)L0C.46 “END-OF -PASS* HOOK 
ve * OF END OF PASS ROUTINE 
rs MODIFIED BY ACTi1. 
56 2.L0C.52 PROGRAM NEEDS HOOK 
;@ BIT 15*1 PROGRAM SHOULD BE POWER 
:@ WHILE RUNNING 
* 
— BIT 14-3 0! NO POWER EA enony SIZE DEPENDENT 
3% O NOT oy SIZE 
rt BIT 13*1 PROGRAM RE S MANUAL INTERVENTION 
6 =O MANUAL ION NOT REQUIRED 
on oil BITS 12-0 MUST BE 's 

FENDAD :31)SET LOC.46 TO ADDRESS OF SENDAD IN . SE0P 

WORD BIT14 :32)SET LOC.S2 TO INDICATE MEMORY SIZE DEPENDANT 

"SBTTL APT11 HOOKS 

224 ::SET POWER FAIL TO POINT TO START OF PROGRAM 

FOR APT START UP 

ST ;SO RT11 CAN START WITH RUN COMMAND 

244 +:POINT TO APT INDIRECT ADDRESS PNTR 
STARTS: BR START1 ; “NORMAL” START 

BR START2 ;RESTART (SAVE ERROR ACCOUNTING) 


. #300 
START1: CLR all 
ART 
START2: SET RESTART 


933737 177777 002626 MOV @-1.RESTART 
7 003670 


JMP START 
. *STACK 


bAPTHOR -IPOINT TO APT HEADER BLOCK 


Cyn yago gsvil- -J 


sseceareece 


pet try rt epee pet ty te tes ee ye 
SESERSEESS: “$$: 
Broken SoanN 


gegsessegeseeeeass 
S5e 


Pt he fet pe ae bee bat feat bee 


ro 
So 





YVVIVURYVNUNYVYNYNUYNNEYUNYNYNYYUYNUNrar aaa 
ee ee ee eee eee eee eee ers) 


BVORSNORD 


ta 
© 
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.SBTTL VARIABLES 
;*THIS TABLE gt | VARIOUS COMMON STORAGE LOCATIONS 
*USED IN THE PROGRAM 


sane 





SPATMAR: .6 
$BANK : 


0 
: O 
: O 
0 
0 
0 
xX: 
0 
0 


o - s . . a > a >. = _ o . 7. oa 7 be, eestor) 
4444 
° : Smmmm 
o 


°o 


ooooooooooooooooo“oocososooo 


coooooooocoeoo 


o 


mee —— eee 


SEQ 0105 
INITIALIZED TO ZERO 


oe OF COMMON TAGS 
FRIENOLY FLAG 
1 SELECT ONLY BANKS MARKED BY eee SERVICE MODE FLAG 
;SET FOR SHIFTING DIAGONAL TEST 
;SET 47 oe we MODE TESTING 
P RESTORING KAMIKAZE MODE WHEN MODIFIED 


SKIPKAMI : 0 sUSEOD T 
s;NEXT TWO BYTES ARE DISPLAYED IN THE DISPLAY REGISTER 
PATTERN NUMBER 


4 | 
iBANK & SIGN | 
:sCONTAINS ERROR LAG | 
ECONTAINS ITEM CONTROL BYTE 

OF ERRORS ON LAST PASS | 
s CONTAINS PC OF ERROR FOR TYPEOUT | 
:CONTAINS PC OF ERROR : 
‘CONTAINS SB OF ERROR FOR TYPEQUT | 


: CONTAINS 
i CONTAINS PSW OF 
TAINS ADDRESS OF ‘BAD’ DATA 







; ; CONTAINS 
; ; CONTAINS 


; ;CONT 
1 CONTAINS 
OR OF GOOD € BAD BITS! 
| sAUTORATIC i ee FOR APT,ACT, & XXDP 


ATAL ERROR I 
; USED IP ERROR MESSAGE IN “SERRGEN” 
:NON-EXISTANT —— CHOLES) 













OUNTE 
sNO P ERROR MODE INDICATOR 
NO MEMORY (HOLES) MODE INDICATOR 
:ME ANK UNDER TEST 
;USED TO INDEX INTO CONFIG TABLE 
fo lg ay est IDENTIFY CPU TO CONFIGURATION TABLE 
s MEMORY FLAG 
PATTERN NUR S 
ANK IS See ake By ks Ecc 


8 acces THIS CPU 
VIF SET “ ICATES MSVii1-J OR MF1IS-K UNDER TESTeeeesesees ? 
IS IN PROGRAM 


TS WHERE PROGRAM RELOCATION IS REQUIRED TO TEST 
;PROGRAM IS RELOCATED FLAG 


Po Is “E08 RERORY” FLAG MEMORY” FLAG 
; “TYPE OF TEST” FLAG: O = PARITY, 1 = ECC 

; “BANK Is INTERLEAVED FLAG seeeseeseseseseesereeesesees 7? 66 
; "BANK IS 64K INTERLEA * FLAGeeeeseeceseseseessesesee 7? a6 
; “MEMORY UNDER TEST IS A MSV11-J" FLAG 
:; “ABORT OCCURED” FLAG | 







— —- 





mn me ee a ae a re ee ee ae eee | —~— o--- 
- - 











“Ou 
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MAiabres |! INITIALIZED TO ZERO SEQ 0106 
: HOLDS OLD KERNAL STACK POINTER IN CASE OF CNTL/K 
3333 003150 — ;wORD ° ‘DATA TO OR FROM CSR 
3143 O0st CSRNO: ;CSR ADDRESS NUMBER (4 LSB‘S) 
3143 costae SAVCSR: CuoRD  O {LOCATION oS Skve CSANO DURING FS COMMAND 
44 002156 OLDCSR: ‘WORD 0 SR NUMBERCUSED IN INH PTR TEST) 
3i3s WOESE LOCATIONS STORE GéR’S DURING SUPERVISOR TESTS 
60 SUPDRO: O 
3it$ Sostes SUPDR1: 0 
5148 002164 SUPDR2: 0 
ay : O 
sii 
ee 3 
| , ;DUMMY LOCATION FOR ADDRESS PASSING 
| - LOCATIONS STORE GPR'S & P&W DURING DETAILED ERROR PRINTOUTS 
0 
; 
0 
6 
6 
0 
} 




















i 000000 
1 000000 
1 000000 
i 000000 
: 000000 
1 000000 
1 000000 
i 000000 
1 000000 
1 000000 
i 000000 
1 000000 
i 000900 
i 000000 
1 000000 
| 3 000000 
$160 sogeiz oponoe 
it i6 900000 DETPSW: 
536 000000 ; DETAILED REPORT FLAG 
1g; 902222 000000 CONTEC REO ‘CSR’S HAVE BEEN TESTED FLAG : 
S$ 002224 000000 TCSRS:.WORD 0 31 BIT PER EXISTING C | 
3} ;CSR O REPRESEN NTeD BY Sir fs. ETC. | 
16 000000 :.WORD O ‘FIRST ADDRESS UNDER CONTROL OF THIS CSR | 
903350 000000 "WORD 0 ; 
rt 000000 WORD O : 
is 000000 “WORD 0 H ' 
ink “WORD 0 i 
i Siaeas Sees as 7 
000000 000000 WORD 0,0 ; 
17 Q 
its Sooeee 900000 ‘WORD 010 
ite 000000 000000 "WORD 0.0 ; T ERROR MASK 
‘7s 000000 :.WORD O ;ADDRESS OF SUBROUTINE TO EXECUTE IN SUP’ «VISOR MODE 
178 000 ‘BYTE 0 LOCAL LOOP PASS CONTROL 
v 
: ; 00006 “BORD ° ;LOCAL LOOP PASS CONTROL 
181 000000 WORD 0 ;USEO T vE 32I..C. sREV 
3 : 000000 .WORD 0 USED 
i re S000 "WORD 0 * XXDP 
: aS Seoces ‘OND Oo REAL PATTERN UNDER TEST 
313; 000000 :.WORD O UP VALUE OF CACHE CONTROL REGISTER 
3i8$ 000000 :.WORD O :BARITY TRAPS SOMETIMES GO TO ADDRESS STORED HERE 
3i3s 900000 “WORD 9 + OSED Fon RELOCATION +O FIELD — | 
183 Sossie go0000 ‘WORD OO ;SOURCE OF DATA WORDS FOR CHECKB:T GENERATION SUBROUTINE 
‘St ‘3 000000 .WORD 0 ;CHECKBITS TO BE LOADED INTO CSR | 
132 6 000000 "WORD 0 : CHECK aITs TO BE WRITTEN | 
13a Sos822 oo0000 ‘aa 6 eee ALL A'S PATTERN | 
ioe ooe824 900000 ‘WORD OO WALUE TO Ge THE PC BY TO RECOVER AFTER A PARITY TRAP | 
5196 002326 000000 "wORD 0 :V 








_——— ——-—— — — me ee ae ae ae — ee 
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VARI BS INI TAL STD To ZERO _ SEQ 90107 
5197 002330 900000 CSRINC: .WORD 0 ;VALUE TO INCREMENT ADDRESS BY TO REMAIN IN THE SAME CSR 
5196 002332 000000 CSRLOOP:.WORD 0 ;LOOP CONTROL FOR CSR TESTING 
5199 002334 900000 SUCCESS: .WORD 0 ;FLAG SET BY SUCCESSFULL TASK OR SUBROUTINE 
pos bad 000000 ZEROS: .WORD 0 ;FOR AIO TIONS 
1 002 000000 TIME : .WORD O ;SECONOS THAT BATTERIES SHOULD LAST 
002342 9000000 SKIPMK: .WORD 0 ;FLAG TO SKIP MKCONT 
000000 :.WORD O T 
000000 LAG: 0 ;FLAGS IF ACT, OR XXDP CHAIN MODE 
000000 sFLAGS ACT AUTOMATIC RULES 
002 000000 ae AUTOMATIC MODE RULES 
7 0023554 000000 XXDPCHAIN:0O CHAIN MODE PROGRAMMING RULES 
eg THESE TWO lees MUST STAY ToceT HER 
002556 000 iNULL: .BYTE :sCONTAINS NULL CHARACTER FOR FILLS 
10 900 sFILLS: .BYTE 9 s sCONT AINS @ OF FILL CHARACTERS 
002360 000 STPFLG: y ot ] 33 “TERMINAL NOT AVATL ABLE" FLAG 
ceases 000000 :0 ; sESCAPE ERROR 
000000 .¢] ;USED FOR ALTERNATE DATA PATTERNS | 
5 000000 :0 :COUNTS DOI ST 
0 co00000 0 ;BACKED UP COPY OF STRIPES ' 
7 72 000000 0 ;NO TABLE BEING PRINT - NOW 
186 002374 000000 0 sSIZE OF 11745 MOS MEMORY IN K WORDSseseeseseeseses 7? s0e006 
9 376 000000 0 ;SIZE OF MF11S-K MEMORY IN K : ————_—cccaae, ? eeesee 
000000 0 :SIZE MSV11-L/P MEMORY = § 
2 000000 0 :SIZE MSV11-J MEMORY IN K — 
060000 0 :sSIZE OF Q@-BUS PARITY MEMORY IN K WORDS 
000000 :0 ;*LAGS WHEN TOO MANY ERRORS — BEEN PRINTED FOR A BANK 
10 900000 Y: 7FLAG TO PATTERNS T 
i2 000000 000000 70,0 ;THE ADDRESS TO T ‘on 
38 000000 : O sHIGHEST ACCESSABLE BANK OF MEMORY THRU @-BUS MAP 
000000 0 ;FLAG TO ALLOW STOPPING WITH SWITCH REGISTER 
6 002422 000000 . WORD 0 : PARITY yr ACCORDING TO APT 
24 000000 : .WORD O ;AMOUNT OF ECC Y ACCORDING T 
000000 NOF SMODE : 0 FLAG TO ozone FIELD 2 SERVICE MODE 
000000 NOERROR : 0 THIS IS NOT AN 
0024 000000 LOADBANK : 0 8 LOADERS ARE RELOCATED TO 
Sone 000000 TEMP: 0 ; USED FOR JUNK 
000000 QUICK: Oo sQUICK STOP FLAG FOR APT POWER FAIL 
002440 000000 NOSC : :"NO SCOPE LOOP ALLOWED” FLAG 
goness 000000 FSINFLAG:0O ; “FIELD SERVICE - NO INTERNAL INTERLEAVE” FLAG 
000000 APTSIZE:0 iApT SIZING INFO FL 
000000 TF TRUE WHEN IN FIELD SERVICE COMMAND 7 
9 50 000000 CONFIGURATION ERROR 
S33 000000 ;USED F ee INDEXING 
1 000000 ;NO 22-BIT 
as¢ 002456 000000 :NO SUPERVISOR MODE F LAG 
43 002460 000000 0 ;HOLDS THE CSR’‘S ERROR ADDRESS 


~~ — 


EET TTT LL A mm mm 
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GARTABLES Par eTALSTED TO ZERO” _ SEQ 0108 


5244 002462 000000 000000 000000 CSRINFO:0,.0.0.0.0,.0,.0.0 ;USED TO STORE INFORMATION ABOUT THE 16 
70 000000 9000000 000000 | 
000000 000000 
5245 002 000000 000000 000000 0.0,0,.0,0.0,0.0 ;sPOSSIBLE CSR’'S 
10 000000 900000 000000 
16 000000 000000 
5246 000000 LINKi: O ;USED TC HOLD LINKS TO PATTERNS WHICH 
7 000000 LINK2: 0 ;CAN EXECUTE IN THE PAR/PDR‘'S OR NOT 
000000 c 0:0 ;USED TO STORE CSR VALUES FOR CSR TESTS 
9 000000 KFLAG: O ;USED TO FLAG MF11S-K MEMORY TO TESTSeescesecsesesesessesecs 
32 000000 000000 : .WORD 0,0 ;POINTS TO PROGRAM CSR 
1 000000 INHECC: .WORD 0O sFLAGS INHIBIT ECC TESTS ON RELOCATION 
000000 I :.WORD 0O : 
002542 000000 FULLREL:.WORD O 
5254 002544 SCMTGE: ;*END OF COMMON TAGS 


mm = we oe me - - 
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ARTABLES INITIALIZED. TO NON ZERO SEQ 0109 
$257 .SBTTL VARIABLES INITIALIZED s. NON ZERO 
002544 000000 CACHKN: 401,0 ;CACHE CONSTANT (MOVED TO CONTRL TO TURN ON CACHE) 
9 002550 001014 CACHKF: 1014 ; CACHE CONSTANT CMOVED TO CONTRL TO TURN > CACHE ) 
pes tir} TESTMODE : 40000 Te. TO SELECT THE PROPER TEST MODE FOR A PATTERN RUN 
i ERRMAX: 10 ;MA OF ERRORS PER BANK WITH SW11 
002556 000177 LASTBANK : 177 HIGHEST. BANK OF MEMORY 
5265 002560 177000 LASTBLOCK : 177000 ;HIGHEST BANK OF MEMORY+1 CIN PAR FORMAT) 
Fr +e 1 ENDADD: 160000 sENDING ADDRESS 
5 ENDFLG: O :END FLAG 
aces 000000 SWRFLG: 0 sUSED TO BUMP STACK ON FIRST CALL TO GTSWR 
Fy 4 ] PASCNT: 0 ;PASS COUNTER 
72 000031 SOBK: 25. :SOB CONSTANT 
5269 002574 002000 KSTACK: STACK sSTACK BEGINNING 
70 002576 900001 LOADHOME : 1 sHOME BANK OF LOADERS 
71 002600 177777 WORST: 177777 sSET IF ao Rit: IN WORST FIRST MODECiIST PASS) 
72 002602 176545 SEEDHI: 176543 s;WORKING SEED HI CUSED FOR RANDOM NUMBER po a ah ak 
7 oases 123456 SEEDLO: 1234 ;sWORKING SEED LO CUSED FOR RANDOM NUMBER GENERATOR 
a BA red He ag + oeaas ;MASTER SEED HI CUSED FOR RANDOM NUMBER GENERATOR) 


sMASTER SEED LO CUSED FOR RANDOM NUMBER GENERATOR ) 
;USED 7% PRINT HEADINGS ONLY ONCE 
;FOR ALO IN "MOV" RUCTIONS 
3 FLIPLOC:3 ;COUNTER FOR FLIPING DATA ON WORST CASE NOISE TEST 
052525 ya te :52525 ;PATTERN FOR SOFT ERROR BACKGROUND TESTS 
000000 LPADR: .WOR 0 OPE LOOP 
SLPERR: -WORD O 33C 


000000 ON RE 
000000 RESTART: 0 RESTART CSTART ADD 
000000 $ERTTL: .WORD 0 PTCONTAINS TOTAL ERRORS 


eee 


set 


35 
Ro 
Oo 


SOME EERE RENS 
Sxeseataue 
g 
3 


eer an ae NOTE THESE TWO pe gph MUST STAY TOGETHER seeeeseesase 


85 
Fite] 002632 000377 BAKPA .WORD 377 ;BACKGROUND PATTERN & 
267 002634 177400 SUAPAT: -WORD 177400 : SWAPPED BAKPAT > 
ogee | PRAREEAEEEESEREREEEAEEEEEEEEDEEEEEEEEEEEEEESEE4OOD$4O640600660460006460606060600046888 
002636 177570 SWR: .WORD OSWR ;:ADDRESS OF SWITCH REGISTER 
91 002640 177570 DISPLAY: .WORD ODISP : SS OF DISPLAY REGISTER 
92 002642 177560 $TKS: 177560 3zTTY KBD STAT 
177562 $TKB: 177562 ;3;TTY KBO BUFFE 
94 002646 177564 $TPS: 177564 sayay PRINTER STATUS REG. ADDRESS 
002650 177566 $TPB: 177 ;sTTY PRINTER BUFFER REG. AQORESS 
2S 00265 012 $FILLC: .BYTE i2 ;sINSERT FILL CHARS. AFTER A "LINE FEED” 
00265 207 377 377 $BELL: .ASCIZ <207><377><377> | }CODE FOR BELL 
57 077 $QUES: .ASCII /?/ ; ;SQUESTION MARK 
5299 002660 015 $CRLF: .ASCII <15> ; ;CARRIAGE RETURN 
gee 002661 012 000 $LF: Py <12> ;;LINE FEED 


S2wVuoe &wvo 

oe 

“aw 

N~ 

and 

“an 

NN 

et iu 

ae 

P 
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~~ 

es 

Bag ay 33 
me pet tet 

eT eee ee 
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CONF IGURATION TABLE 


5304 
5305 
5306 


Ssse 


wV@rAUVN2WNY Oo 


Pe ee ne et 


r+ +4 74 000201 
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-SBTTL CONFIGURATION TABLE 
; CONFIG: FIRST = CONFIGURATION WORDS (2 EACH) 
; 2ND 6K CONFIGURATION WORDS (2 EACH) 


300TH” sas AaapaadAtten WORDS (2 EACH) 


; CONF IGURATION WORDS: 
; LOW: BIT O ERRORS PRESENT 
MEMORY SUCESSFULLY ACCESSED 


1 
2 RESERVED 
BIT 5 SKIP ECC LOGIC TESTS FLAG (¢ ll 
6 PROTECTED REGION OF ECC 

BIT 7 oan ECTED (PROGRAM SPACE) 


; 

+ 

; 

; 

: 

: 

i 

: HIGH: BIT 0-7 NUMBER OF ERRORS 

; Y TYPE 

F BIT ii RESERVED 

F BIT i2 RESERVED 

F BIT 13 “BACKGROUND PATTERN VALID” FLAG 
; BIT 14 BANK SELECTED FOR TEST BY FIELD SERVICE MODE 
é BIT 15 LOADERS HOME BANK 

ONFIG: .REPT 201 

CONF IEND: 


SEQ 0110 
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seeasecsscccecarseeces MAIN seccssssccsossssosesesesss SEQ Olli 


Th 4 0466006606066600000006 MAIN 0064606246646 66404600086806 


. SBT 
START: SUBTST <<INITIALIZE VARIABLES TO ZERO>> 
$ CROSSES EEESEESESESESESEEESEEEESESESESESEESESES SEES EAEAEHESEEAEEESEEEREOSEOREEEOD 


5331 
5332 003670 


;@SUBTEST INITIALIZE VARIABLES TO ZERO 
3 5 § SSOSESEEEEESEESS$! LEASESSESSESSSSSSSSESSSHSSSSSSSHHAASESAESSESHSEHAEESEHEESESSEHEOAEEEHS 
3335 003670 SUBTST <<SAVEMT>> 
ee 
pe 
f PESSSSSESEAESEESSESESESHSERESEESASEASESSESASASSSESSESSEKRSSEHAKEESHAESSESEHESESESSHEHSEESOEE 
5335 ;SAVEMT SAVES THE EMULATOR AND PRIORITY LOCATION 
Hy ;UNDER THE NAMES OF SAV30 AND SAV32. | 
348 003670 SAVEMT 
;3 LCP/ORION ROUTINE TO SAVE EMTULATOR AND PRIORITY 
003670 005737 003756 EMTSAV: TST SAV30 :; FIRST TIME THROUGH ? | 
003674 001034 BNE VMKOR ;: BRANCH IF BEEN HERE ALREADY 
003676 €32737 000040 000052 BIT BITS, 9052 +8 We IN UFD MODE ? 
003704 001430 BEQ VMKOR :3; LEAVE IF NOT 
003706 012737 177777 003762 MOV @-1,UFDFLG 33 SET UFD F 
003714 032737 000100 000052 BIT OB1T6, 8052 7 WE LIN QUIET MODE ? 
003722 00140 BEQ 3; BR IF NOT 
003724 012737 177777 003764 MOV @-1,UQUIET ;3 SET QUIET MODE 
0037 2 104042 i$: EMT 42 ;3 GET ADDRESS OF XXDP DCA TABLE 
003734 005060 000042 CLR 42(RO) :3 CLR XXDP+ “"DRSERR* 
003740 013737 000030 003756 V 30, SAV3 ;; SAVE EMULATOR ADDRESS 
003746 013737 000032 003760 MOV 32. SAV32 33 SAVE EMULATOR PRIORITY LEVEL 
003754 000404 BR VMKOR ;3 GET AROUND TAG AREA 
003756 000000 SAV30: .WORD - PUT EMULATOR INFO HERE 
003760 000000 SAV32: .WORD 0 :3 PUT PRIORITY LOCATION HERE 
003762 000000 UFOFLG: .WORD ;; USER FRIENDLY MODE FLAG 
003764 000000 UQUIET “WORD 0 ;; UFD QUIET MODE FLAG 
349 003766 105737 056736 TSTB sENV 
003772 001001 NE NORES 
1 003774 000005 RESET 
5352 003776 NORES: CLEAR MONFLG ;;CLEAR RETURN TO MONITOR FLAG 
003776 002276 CLR MONFLG 
3 004002 010637 002274 MOV SP , SAVMON ::SAVE XXDP MONITOR RESTART ADDRESS 
004 013706 002574 MOV KSTACK, SP ;;SETUP THE STACK POINTER 
5 004012 012700 002000 MOV @$CMTAG,RO :3FIRST LOCATION TO BE CLEARED 
004016 20 i$: CLR CRO)>+ ;:;CLEAR MEMORY LOCATION 
: 7 004020 022700 002544 CMP &$CMTGE ,RO ; 3DONE? 
3 004024 001374 BNE 1$_ ;LOOP BACK IF NO 
> 004026 012737 000177 002556 MOV 7,LASTBANK ;RESTORE LASTBANK (THIS MUST BE DONE PRIUR TO SYSTEM SIZING) 
360 0040 SUBTST et CeaR NON-PROGRAM SPACE> 


oe eee ~ 
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CLEAR NON SEQ Olle 


§ POSSESESESSSESEAERESEEESESESEEERESESSSERESEESSEEAESEEESEAERESEEESESESEOEEOEEEDES 
PROGRAM SPACE 


;*SUBTEST CLEAR NON- 
ee oo ~ *€ OY EO EO ea oa ae eee 


8361 ;sTHIS ATTEMPS TO GET RID OF ANY PARITY ERRORS BY WRITING INTO 
| : ;EVERY LOCATION THAT IS NOT LOADED INTO BY THE PROGRAM OR ALLOCATED ) 
:T0 THE XXDP LOADERS | 
; 2 004034 012737 000001 002076 nov @1..NOPAR sPARITY ACTION = COUNT & IGNORE | 
366 41 2%: CLC 
367 004046 ADC CRO)+ 
368 oases? 020027 160000 CMP RO, #160000 
369 103773 BLO 2% 
370 004056 005037 002076 CLR NOPAR sRESTORE DEFAULT PARITY ACTION 
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EVEAR NON PROGRAM SPACE al SEQ 0113 
5373 004062 SUBTST <<TYPE OF SYSTEM SIZER>> 


§ SSSSSSSSSSESESSSESESSSSAESASSSSESSESSSSSSSSSSSASSSESSESHSHSSSSSSSSSSSSHASHSEHESESEEE 


s*SUBTEST TYPE OF SYSTEM SIZER 






§ SSSSSSSSSSEESESESESSSEASSSESASESASESESESESSASSSSESESSEHSSSHHSKSSHHSSSSSSSSSHSESESSESEEEE 
SYSS 


74 004062 000401 ;SKIP OVER VARIABLE LOCATION 
75 004064 000000 PROTYP: .WORD 
376 004066 SYSSIZ: SET4 3% 
012737 004162 000004 MOV 034.4 
$377 004074 012737 004106 000010 MOV #1$,10 ;TRAPS TO 10 = BAD PROCESSOR TYPE 
3 78 004102 000007 MFPT ;TYPE OF PROCESSOR TEST: THIS INSTRUCTION 
;CAVAILABLE ON NEWER PROCESSORS ONLY 5 PLACES 
3A CODE IN THE LOWER BYTE OF RO HAT 
‘INDICATES THE PROCESSOR TYPE. ienivee 
:3=11/23, 5=11/83/84 (Orion) 
004104 900413 BR 2% 
004106 012737 047030 000034 1%: MOV OSTYPE, 34 ;LOAD TRAP VECTOR 
5 004114 TYPE SG130 ;TELL THEM BAD PROCESSOR TYPE 
004114 104401 071545 TYPEIT ,MSG130 
904120 010046 MOV RO, -(SP) :3:K SAVE RO 
004 2 905000 CLR RO 33K CLR tC AND tZ POSSIBILITIES 
904124 004737 052220 JSR PC ABORT :3K SEE IF THIS IS A UFD ABORT SITUATION 
004130 012600 MOV CSP )+,RO ;3K IF NOT RESTORE RO AND HALT 
90 004 000000 HALT ;NO NEED TO GO ON 
91 004 012737 000012 000010 2s: MOV #12,10 ;RESTORE TRAPS TO 10 
92 004142 110037 004064 MOVB $RO,PROTYP ;MOV THE CODE TO PROTYP 
93 004146 SET4 3% 3 
004146 012737 004162 000004 MOV 033.4 
004154 005737 177746 TST CONTRL ;SEE IF CACHE REGISTER RESPONDS 
904 60 000447 BR 6$ ;BRANCH IF CACHE AVAILABLE 
62 005037 002544 3$; CLR CACHKN "NO CACHE ON SYSTEM 
004166 012737 002336 060412 MOV ZEROS ,DT14 ;00 NOT PRINT CONTRL ERROR MESSAGES 
022737 5S 004064 CMP #5. PROTYP 115 THIS A 11/83/84 
399 004 001436 BEQ 6% YES - BRANCH 
004 SET4 =—s-s@ 8 : 
004 012737 004234 000004 MOV oa 4 
004212 005037 172516 CLR MMRS SEE IF THERE IS 22-BIT ADDRESSING 
onsale 737 00020 172516 BIS @BIT4,MMR3 , 
032737 000020 172516 BIT B1T4, MMR3 
905 BNE }BRANCH IF 22-BIT RELOCATION 
37 0024654 4%: INC 2BIT ;SET FOR NO 22 BIT ADDRESSING 
004240 012737 000007 002556 MOV #7 , LASTBANK ‘HIGHEST BANK OF MEMORY 
0 2737 40000 002552 5%: MOV #140000, TESTMODE ;MAKE TESTMODE USER 
7 sooase INC SUPER ; 
004 37 CLR DTS+10 ;CLEAR SOME ERROR DATA TAGS 
10 904 37 000422 CLR DT14+10 ; 
i 0 37 060264 CLR DT5+12 
i 74 37 060424 CLR DT14+12 
1 022737 000005 004064 6%: CMP #5, PROTYP ;CPU TYPE = 11/83/84 
14 004 001003 BNE 22% ;NO - R 
S415 004310 052737 000020 172516 BIS B1T4,MMRS SET UP 22 BIT , ADDRESSING 
5416 004316 22%: SET4—s«é78 ;TRAPS GO T 
004316 012737 004342 000004 MOV 07$.4 
DSABL CRF 





TYPE OF SYSTEM'S all or 


Sans eostas ooze 
5419 004 O12 737 


5420 00434 
00434 032737 
004 737 
004 002 
004360 37 
004364 


5421 


177766 
177777 
034002 
000005 


177766 
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CLR CPERRF 
TST 80177766 


052364 MOV @-1,CPERRF 
7%: RES4 
000004 MOV @TIMEOUT .4 
004064 CMP #5 .,PROTYP 
= 101% 
101%: 
DSABL CRF 


Pege 123-i 


oe THE F 

:IS — rf tPG ERROR REGISTER? 
ENABLE TRAPS TO 4 

;IS THIS AN 11/83/84 ? 

;BRANCH IF T 

;CLEAR OUT THE CPU ERROR REGISTER BITS 


;THAT A EXPECTED TRAP COULD HAVE SET 


SEQ 0114 


ome eer 
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TYPE OF SYSTEM SIZER - SEQ 0115 
5424 004364 SUBTST <<INITIALIZE VARIABLES TO NON ZERO>> 
, $6 6666666666666 666666606660 66666066666 6666666 0606666686466606466666666466646646666666 
;@SUBTEST INITIALIZE VARIABLES TO NON ZERO 
’ $66666026666660666660666 666 6666666666660 60666666046666646606660666664668466666666666 
5425 004364 SET WORST 
004 564 012737 177777 MOV @-1,WORST 
$426 004 012737 000003 002616 MOV @3,FLIPLOC 
904406 SET HEADER 
004400 012737 177777 002612 MOV #@-1,HEADER 
004406 0 737 176543 002606 MOV 0176543 ,MSEEDH 
004414 012737 123456 002610 MOV #123456 . MSEEDL 
013737 002602 MOV MSEEOH, SEEDHI ;PRIME THE RANDOM NUMBER GENERATOR 
004430 013737 002610 ©2604 MOV MSEEDL . SEEDLO ;BO0TH HIGH AND LOW WORDS 
004436 012737 000377 002632 0377 ,BAKPAT 
004444 012737 177400 002634 MOV #177400, SWAPAT 
5434 004452 SUBTST <<INITIALIZE VECTORS>> 
———————— 
;sSUBTEST NITIALI 
| $666466466066666066804666466466646666668 0646 60660666666686666 662066664668 66866666666466666686 
3S 004452 12737 051054 000020 MOV @$SCOPE , IOTVEC ;;I0T VECTOR FOR SCOPE ROUTINE 
004460 012737 340 MOV #340, IOTVEC+2 ;;LEVEL 7 
904466 0127 7 051410 000030 MOV @SERROR, EMTVE ;3;EMT VECTOR FOR ERROR ROUTINE 
4 012737 900 000032 MOV 340, EMTVEC+2 aL 7 
004502 012737 057034 000034 MOV Os TRAP, TRAPVE ;;TRAP VECTOR FOR TRAP CALLS 
004510 012737 000340 000036 MOV 340, TRAPVEC+2 ;LEVEL 7 
012737 045260 000024 MOV @$PWRON, PURVEC ; POWER FAILURE VECTOR 
012737 000 000026 MOV 0340, PWRVEC +2 ;;LEVEL 7 
012737 033632 000114 MOV @PARITY , PARVEC ‘GET READY FOR PARITY ERRORS 
004 012737 000340 000116 MOV 340 ,PARVEC+2 
5 904 012737 034026 000010 MOV @PDP1105, RESVEC ;RESERVED INSTRUCTION TRAP 
S54 012737 000340 000012 MOV @340, RESVEC: 
004 012737 034002 000004 MOV @TIMEOUT , ERRVEC ;SETUP TIMEOUT ERRORS 
004 012737 000340 000006 MOV 0340, ERRVEC+2 ;SET PRIORITY OF ERROR TRAPS 
004576 012737 034014 000250 MOV RAP ,MMYEC ;VECTOR FOR MEMORY MANAGEMENT 
5450 012737 000340 000252 MOV 6340 ,MMVEC +2 
1 004612 1044 CACHON ;TURN CACHE ON 


——— - 








012737 
006001 


12718 


062703 


Si 
000207 


CVMJABO MSV11-J MEMORY DIAG. 
INITIALIZE VECTORS 


5454 004614 


057004 
016702 
ae 
000010 
0047 


017132 
900988 
900019 
017316 
0047 


000010 
0047 


ee 
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SUBTST <<INITIALIZE PATTERNS>> 
~~" ve  -. _ \_————a__cccssaspzaaaancercarnees 
s*SUBTEST INITIALIZE PAT 
seteetwe tne ABT E-TABLE OETERMINES UMICN PATTERNS ARE GOING TO GERM. 
APT E-TABLE DE S WHICH PATTERNS ARE GOING YT = 
BIT SET REPRESENTS A PATTERN TABLE ENTRY ‘wt Is TO BEL 
sALONE (TO BE RUN). EACH BIT CLEARED REPRESENTS A PATTERN TABLE "entry 
s BE OVERLAYED WITH THE ADDRESS OF A NULL PATTERN. 











spgapasacgaraaapagcaaag 





UG IN NULL PATTERNS>> 


<<SUBR 


PL 
F] 2 ee 


s *SUBTEST 
meen sack % %  Yibeoumeeneneeemeemmeneeemememeeemmeenmmnenneeees 


PATPLUG: SUBTST 





FOR I := #1 TOR 
80 MOV #1,I 
= 2533583 
ON. 3IF CARRY CLEAR 
MOV @MTOS99, CRS) oe we 
cos aga 
LOssssess 
END et 7° e6R 
tHe I.R2 
ms BLE BO 
ow SEeEEEE 


SEQ 0116 


— 


a ee ee 
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5494 004770 SUBAAA: SUBTST <<CLEAR THE CONFIGURATION TABLE>> 
I eee yg Sk n—caaeccccrcccmemmaaes 


! 
s@SUBTEST THE CONFIGURATION TABLE | 








lone TY OE oo En ee 
sTHIS ZEROS CUNLESS WE STARTED AT ADORESS 202) THE CONFIG TABLE 
| WHICH IS FULLY DISCRIBED AT LOCATION “CONFIG”. 


-ENABLE LSB 
IF RESTART IS FALSE 


TST RESTART 
ONE Li 


is: 





Lisssssss 





SET ID BIT 
SWITCH REGISTER>> 
P| = | san nh nC. 
| eSUBTEST SIZE FOR A HARDWARE SWITCH REGISTER 


3303 pee ates 012737 000002 002106 
ame’ ks > & % VemRguberseemmmenemeemeneennnneenetenennees 
it Ay “-1", SETUP FOR A SOFTWARE SWITCH SEGISTER. 


7 4 A NOT F 
10 EN nat 53% TRAPS TO 4 GOTO 3% 
So3es6 012737 005084 000006 MOV eae’ 4 ’ 











1s SETUP FOR A HARDWARE SWITCH REGISTER 
MOV eoDrsh.0: DISPLAY ; : gAND A HARDWARE DISPLAY REGISTER 
IF #-1 EQ SSUR F NO TRAP FROM REFERENCE TO @SWR AND @SUR = @-1 
one i - 


177570 002636 
177570 002640 


177777 175566 












2s :sBRANCH IF NO TIMEOUT 
005062 3%: #2¢,(SP) ::SET UP FOR TRAP RETURN 
2s: sRESET TRAPS TO 4 TO DEFAULT 
on 
004064 aS THIS AN 11/83/84 ? 
5 
177766 or sCLEAR OUT THE CPU ERROR REGISTER BITS 


sTHAT A EXPECTED TRAP COULD HAVE SET 
000176 36 33:POINT TO SOFTWARE SUR 
000174 oosea0 

L2:ssssss 





= ee —_— - a RE TT TS TL a eee ae ee — 
-~- 


SY7e Por A HARDWARE SUIT 


$524 005120 


4 
5529 
$530 it 
5531 4 
5532 0051 
5533 0051 
5534 OC 
$535 0¢ 70 
905176 
9052¢ 
sate 
5357 Gone 
+44 
++% 
5539 005236 
508; 
05244 
+. 25 
5540 20525 
105: 
$541 008 ; 70 
re 276 
$542 00530¢ 
5543 OC 
05310 
$544 005310 
5545 005316 
$546 16 


16 
5547 005316 


005037 
pty $4 0 
1403 


012737 


132737 
001403 


012737 


001025 


3727 
Sit 
001421 
0% ut i 
012737 


3727 
1004 


012737 
000403 


012737 


056724 
000040 


177777 


177777 


177777 
177777 
000042 


177777 


177777 


I 


002354 
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SUBAAB: SUBTST <<SETUP ACT, APT, E XXDP>> 


§ SSSSASSSSSSESSSSSESHHSSSSSSSSSSSSESSSSSSSSHSSSHSSSSSSHHHSSHSSSSEHHSESSHHSHEESHEEEEEES 
xOP 


; *SUBTEST SETUP ACT, APT, 
| CSOESSESSESESSSEEESESSESSEESSEESSEESASEAEEEOESSEOEESEEESESESESESESSOSESEESESEESES 


;THIS SETS UP A GUNCH OF FLAGS TO TELL THE PROGRAM EVERYTHING 
IT ae KNOW ABOUT APT 


T 
‘ ;CLEAR PASS COUNT 
IFB @BITS SET.IN SENVM 


a. 
SET STPFLG ; INDICATE NO TERMINAL 
MOV @-1,8TPFLG 
END ;OF IFB @BITS 
LSisasass 
IFB @BIT7 SET.IN SENVM 
BITE eBIT7, SENVM 
BEG L4 
SET APTSIZE 
MOV @-1,APTSIZE 
END ;OF IFB @BIT7 
L4:sssase 
IFB SENV EQ @1 
CMPB SENV, @1 
BNE LS 
SET APTFL.AG,QVFLAG, $AUTO, QUICK 
MOV @-1,APTFLAG 
MOV @-1,QVFLAG 
MOV #@-1,$8AUTO 
MOV #@-1,QUICK 
MOV @AP TDOWN , PWRVEC 
MOV &$SWREG, SWR ;USE APT SWR 
ELSE 
BR L6 


LSssisses 
CMP 42, STACK 
BEG L7 


IF 42 NE @STACK AND 42 NE 60 


SET QVFLAG, SAUTO 
MOV @-1,QVFLAG 
MOV @-1,$AUTO 


CMP 42, @SENDAD 
BNE 110 


IF 42 EQ @s8ENDAD 


SET ACTFLAG 
ELSE 
BR Lil 
LiOsssssae 
SET XXDPCHAIN 
MOV #@-1,XXDPCHAIN 
END ;OF IF 42 nas 
2888883 
END ;OF IF 42 


L7Vssssass 
END ;OF IFB SENV 


SE@ 0116 


- LE TT -- —_—_ —— e- 
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SETUP ACT, APT, E XXDP SEQ 0119 
005316 LOsssasis 
5549 005316 SUBTST <<PROTECT PROGRAM € LOADERS>> 
| POSSESSES EEEEESEESEESESESAESEESEESESESERESSEESEEESSEESEEEEEEEEEESSEEHEEEEHEEEEESS 
; eSUBTEST PROTECT PROGRAM € LOADER 
— me *\ —7_7§- ix YU: 1 eee 
000200 002664 BIS @BIT7. CONFIG ;PROTECT PROGRAM SPACE (BANK 0) 
000200 002670 BIs @BIT7.CONFIG-4 ;PROTECT LOADER SPACE (BANK 1) 
IF @SENDAD NE 42 sNOT ACT-11? 
013730 000042 @SENDAD . 42 
@ L112 
IF NO2Z2BIT NE #0 : 
002454 TST NO22B1 
BEG L153 
SET MONF LG ;RETURN TO XXDP MONITOR 
177777 002276 MOV @-1,.MONFLG 
ERROR +64 ;ILLEGAL PROCESSOR 
ELSE : 
BR L14 
LADBSsssssss 
TYPE MSGOO0O ; TYPE PROGRAM TITLE 
071472 TYPEIT ,.MSGOOO 
.DSABL CRF 






LUSssssses 
Li2d:ssssss 


END ;OF IF @$ENDAD 





- - —_——§_———— ee ee ee ee EE ee em 


——— —— —« —_ 


005366 012737 
005737 


DIAG. 


071162 
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SEQ 0120 


SUBTST <<CHECK FOR CACHE AND MEMORY MANAGEMENT >> 
eo gang ee ec eameanes 
:*SUBTEST CHECK MEMORY MANAGEMENT 
mee“ OWT EX OEY OO EOL OE 
;@ THIS FIGURES OuT IF THERE IS A CACHE AND MEMORY NT 
io 48 ON as EM, AND WHETHER IT IS ENABLED OR OISABLED. 
mOV. 














000004 03%,4 
.OSABL CRF 
CONTRL ;IS THERE A CONTROL REGISTER? 
000004 e184 
3 ;IS THERE A MMR3 REGISTER? 
4, -(SP) :3¥ SAVE OLD TIME OUT 
000004 014% ,4 :3¥ PASS ON KTUL1 
177750 @B1T9, 80177750 33¥ TEST FOR 11 
14% ;3¥ ELSE REPORT 1183 
M1184 33V¥ REPORT 1184 
M1184 
177730 12%: 8118, 90177730 :3¥ SET ABILITY TO CLEAR 
177734 077 ,@0177734 ;3¥ UNIBUS MEMORY ACCESS 
NOUBMT ;3¥ TO UNIBUS 
NOUBMT 
(SP)+,4 ;:V¥ AND REPORT NO UNIBUS 
43 :3¥ MEMORY ACCESS AND CONTINUE 
14%: (SP)+,4 :;¥ ALSO RESTORE OLD TIME OUT 
YPE MSG117 ; 11/83 
TYPEIT ,MSG117 


— LO OL OE LT 


-J MEMORY 
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CHECK FOR CACHE AND MEMORY age 


SEG Ol2l1 
_DSABL CRF 
5580 76 000404 BR 4s 
5581 18: SET MONFLG ;PROCESSOR NOT SUPPORTED BY THIS D SsTIC 
012737 177777 002276 @-1.MONFL 
5 104064 ERROR +64 :NO MEMORY MANAGEMENT 
5 10 052737 000014 177746 43: BIS eBIT2!BIT3.CONTRL ;SET AG ACHE DISABLE BITS 
042737 000014 177746 BIc @B1T2!BIT3.CONTRL ;CLEAR CACHE DISABLE BITS 
032737 000004 177746 BIT @BIT2. CONTRL :IS THE BIT SET? 
001 BNE 73 ;BRANCH IF THE BIT IS SET 
032737 000010 177746 BIT @BIT3, CONTRL ‘IS THE BIT mag 
001413 63 ;BRANCH IF THE BIT IS SET 
7$: MSG121 ; CACHE BYPASSE 
| 005544 104401 071224 TYPEIT .MSG121 
| .DSABL CRF 
| «$590 005550 1044246 CACHOFF 
| 9 013737 002544 002546 MOV CACHKN, CACHKN+2 ;SAVE INFO ABOUT CACHE 
| 9 002544 CLR CACHKN ;CACHE CANNOT BE USED - IT'S BYPASSED 
‘ 
94 005 33: TYPE  MSG119 : NO 
104401 071174 MSG119 
5595 005 cone 6$: PE  MSG120 ;CACHE AVAILABLE 
104401 071203 TYPEIT .MSG120 





.DSABL CRF 








VMJABO MSV11-J MEMORY DIAG. 


CvmJ 
CHECK FOR CACHE 


5597 005576 


3399 005600 
005604 


| $288 oseos 


se 


5625 005676 
5626 


$627 005714 


' 
| 


AND MEMORY 


sees $ 
005737 


001011 
042737 
052737 
012746 
006606 


052737 


012746 
006606 


005737 
001012 
023727 
001006 
012737 
104407 
005037 


104422 
010346 
0127035 
004737 


012603 
104420 


002456 


030000 
010000 


000740 


030000 


000700 


002062 
002636 


177777 
002566 


000200 
035604 


MACRO 
MANAGEMENT 


177776 
177776 


177776 


000176 


002566 
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SUBTST <<SETUP USER & SUPERVISOR STACK>> 


“6 cho aA 
a STEs é Vv 
* 0a dbbdadobadegREDSEDSS|ODDDSNNNDNDNRNNSNNNEIESENNNSESNOSEECEODEOORSORSS 
St; DEENERGIZE ;TURN OFF Y MANAGEMENT 

TST NOSUPER :1S THERE A SUPERVISOR MODE? 

BNE S$ ;NO-SKIP SUPERVISOR SETUP. 


yy PREVIOUS MODE TO SUPERVISOR 


@BIT13!B81IT12,PSW 
BIS #6IT12,PSW 
PUSH @SUPSTK 
MOV @SUPSTK, -(SP) 
MTPI SSP 
;SET PREVIOUS MODE TO USER 
5$: BIS @BIT13!61IT12,PSW 
PUSH @USESTK 
MOV @USESTK, -(SP) 
MTPI USP 
SUBTST <<GET SOFTWARE SWITCH REGISTER IF NECESSARY>> 


atest GET GOFTUARE CUTTCH RECISTER IF Ce. 


;*SUBTEST GET SOFTWARE SWITCH REGISTER IF NECESSARY 
j PREEAEREEEEEESAESASSEEEEAREEEEEAREREE SEES ESEEEEASESEEEEEEEEDEEEEEEEEEEEEDEEEDED 


IF sAUTO IS FALSE ;IF NOTCAPT OR ACT) 


TST sAUTO 
BNE Li5 
IF SWR EQ @SWREG ;IF SOFTWARE SWITCH REG SELECTED 
CMP SWR, @SWREG 
BNE L1i6 
SET SWRFLG :;;SET FLG TO BUMP STACK 
V @-1,SWRFLG 
GTSWR ;;GET SOFT-SWR SETTINGS 
CLR SWRFLG ;;CLEAR IT FOR REST OF PROGRAM 
END ;OF IF SWR 
Li6sssssss 
END ;OF IF $s$AUTO 
LiSsssssss 


SUBTST <<GET MEMORY MANAGEMENT READY>> 
be aay ae ge aa ae aeeememamamunmnes 


: *SUBTEST MEMORY MANAGEMENT READY 
wee ews + Ss ~ e¢ < aheeoneemeeee 
KMAP ;MAP KERNEL SPACE 1 T0 1 
;MAP SUPERVISOR SPACE cTest —. 1 es 1 sp) 
MOV #200 ,,RS 
CALL MAPPER 
-OSABL CRF 
MOV (SP)+,R3 
ENERGIZE ;TURN ON MEMORY MANAGEMENT 


SEQ 0122 
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C 
GET MEMORY MANAGEMENT READY SEQ 0125 


5630 005716 NEWTST <<BIT TEST OF ALL CSR‘S>> 
§ SSSSSSSSSSESEESSSSASESSESASSSESSSESSSSSSSSSSSSSHSSSSHHHSSSHESASSSASESESSSEASESEESSEES 
;#TEST i BIT TEST OF ALL C 
3 aaa aman tsa iain aaa ocala 
005716 000004 TSTi SCOPE 
5631 ;* THE FIRST PART OF THE CONFIGURATION ANALYSIS DOES THE FOLLOWING: 
seas 3% 1) FINDS WHICH CSR‘S RESPOND, AND PUTS THEM pi THE CSR INFORMATION 
3 3% TABLE. AND STORES ANOTHER BIT FOR “TOTCSRS” 
Fate ;* 2) TESTS THE CSR BITS COMMON TO a, CSR's. 
35 3% 3) FIGURES OUT IF THE IS A ECC S oe ban MEMORY 
3636 ;4 4) TESTS THE BITS PARTICULAR TO THAT TYP 
3% 5S) IF ANY BITS TEST BAD IN THE CSR R Test. THE CSR OK BIT IN THE 
3s 3 CSR INFORMATION TABLE IS CLEARED. 
9 34 re BITS ONE THROUGH THREE FORM A CODE WHICH GIVES THE TYPE 
3% 
1 3% ECC 
see 3 TYPE BITO 
564 ;* 
5644 3% MSV11-L/P 0 PARITY 
geez 3% MSV11i-J 1 ECC 
3% 
Fs od ;@ THIS MEMORY CODE WILL BE USED IN THE SECOND PART OF THIS ANALYSIS 
;* 
Fed oo 7ee 005005 CLR RS :RS IS THE TOTAL CSR NUMBER 
722 005000 CLR :RO IS A TABLE INDEX 
1 005724 012703 172100 MOV @CSRADD,R3S ‘R3 HAS THE CSR ADDRESS 
0057 012737 002076 MOV #1,NOPAR ; IGNORE PARITY ERRORS 
736 SET4 #CSRBMP 
736 012737 006112 000004 MOV @CSRBMP ,4 
.DSABL CRF 
S654 005744 REPEAT 
744 Blssssiss 
5655 744 005715 TST CR3) ;D0ES THIS CSR RESPOND??? 
7 705 000001 BIS #1,.R5 ;MARK 
7 00 CLR R4 :;CLEAR THE LAST CSR INDICATOR 
7 042760 000006 002462 BIC @6,CSRINFOCRO) ;CLEAR UNUSED BIT 
762 052760 000030 002462 BIS #@BIT4!:BIT3, CSRINFOCRO) ;YES-MARK IT IN CSR INFORMATION TABLE 
sees 770 005013 CLR (R3) ;CLEAR THE CSR UNDER TEST 
i ae LET CRB) := #BITi3 ;1s THIS AN ECC MEMORY??? 
772 012713 020000 MOV @BIT13,(R3) 
5662 005776 IF @BIT13 SET.IN (R3);IS BIT 13 SET 
776 032713 020000 BIT @BIT13,CR3) 
006002 001403 
5663 006004 052760 000001 002462 BIS @#BITO,CSRINFOCRO); MARK IT IN THE TABLE AS BEING A ECC MEMORY 
$664 006012 END ; 
006012 LiA7sssssss 
§ 006012 0050135 CLR CR3) aie CSR UNDER TEST 
006014 004737 006306 CALL RWCSR IT TES! OF ALL BITS IN CSR‘'S 
006020 IF CSRINFOCRO) MI #30 :;00 WE HAVE A LEGAL CONFIGURATION? 
006020 026027 002462 000030 CMP CSRINFOCRO),@350 
ooeoes 100004 BPL L20 
0060 016037 002462 002052 MOV CSRINFOCRO).BAD ;MOVE IN BAD DATA 
9 006036 104021 ERROR +21 ; 
$670 006040 ; 
006040 L2O:ssssas 
5671 006040 062700 000002 NXTCSR: ADD #2,RO0 :GO TO NEXT CSR 
5672 006044 062703 000002 ADD #2,R3 :GO TO NEXT CSR 


eens - - 
A A SM 


Fyne oir te 


5673 006050 
5674 


006305 
103001 
005204 


001380 
005708 


001 
0527 


010537 
004737 
C00137 


062706 
000137 


J MEMORY DIAG. 
ST OF ALL CSR‘S 
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22%: 


CSRBIP : 


ASL RS 
ON. ERROR 


INC R4 
END 


UNTIL RO EQ #40 


ROR RS 

TST R4 

RNE 22% 

BIS @BIT1i5.R5 
LET TOTCSRS := RS 
CALL CSRMAP 
JUMPTO CTEST 

ADD #4,SP 


JMP NXTCSR 


;SHIFT CSR MAP 
;IS THERE A CSR O 


BCC L2i 
;YES-SET CSR PRESENT FLAG 
: 
L2lisssass 
;sUNTIL ALL CSR'S ARE DONE 
CMP RO, 640 
BNE B1 
Elssssass 
;sRESYNC RS 
;WAS THERE A CSR 0? 
;BRANCH IF NOT EQUAL 
BEQ@ 22% 


sYES SET IT IN CSR TABLE 
;STORE CSR MAP IN TOTCSRS 


;PRINT CSR MAP 
3 


MOV RS, TOTCSRS 


JMP CTEST 


;FIX STACK POINTER FOR NON-EXISTANT CSR TRAP 
:GO ON TO NEXT CSR 


SEQ 0124 
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BIT TEST OF ALL CSR’S SEQ 0125 


5690 006122 CSRMAP: SUBTST <<PRINT CSR REGISTER MAP>> 
} § FSSSSESSSSESSSSESSESSSSESSSSSSSSSSSHSSSSSSSSSEHESSSSASSHSSSHSAASSSESSHASESESESEEEEEOESD 
3 *SUBTEST PRINT CSR REGISTER MAP 
| § SSESSSSSEESESEEESESESASSESSSSEESERASSSSSSSSASESASSASKESESSSHSSSESSESESSHSHHHSESSEHSAES 
006 005000 CLR RO ;CLEAR CSR INFO POINTER 
5692 006124 TYPE MSGOO08 ‘PRINT TITLE 
006 104401 071440 vyeerr efiscoos 
5693 006150 TYPE MSGO16 ;PRINT CSR NUMBERS 
006130 104401 066134 is? 3 -_ 
5694 006134 005001 CLR Ri ; 
5695 006136 REPEAT ; 
006136 Bo:sssses 
aoe 006136 030302 MOV R1,R2 ; 
97 006140 022702 000011 CMP #@9.,R2 ; 
Fe t+) 006144 100002 BPL i$ ; JUMP AROUND NEXT INSTRUCTION 
006146 062702 000007 ADD #@7,R2 ; 
700 esting 062702 000060 1%: ADD #60,R2 ;MAKE IT ASCII 
701 0061 110237 066132 MOVB R2,.MSGO15 ; 
702 0061 TYPE MSGO15 ; 
006162 104401 0661352 TYPEIT ,MSGOi5 
-DSABL CRF 
5703 006166 T MSGO14 :; TYPE SINGLE SPACE 
0061 104401 066130 TYPEIT MSGO14 
.OSABL CRF 
704 006172 005201 INC Ri ; 
0S 006174 UNTIL R1 EQ #16. : 
006 020127 000020 CMP R1, 016. 
001356 a BNE B2 
2333833 
5706 006202 TYPE MSGOO9 ; TYPE MEMTYPE 
006202 104401 065614 TYPEIT ,MSGOO9 
.DSABL CRF 
5707 006206 REPEAT : 
006206 BS:ssssse 
5708 006206 IF CSRINFOCRO) NE @0 ;IS CSR NONEXSISTANT???? 
005760 002462 TST CSRINFOCRO) 
i2 001414 BEG L24 
5709 14 IF @BITO SET.IN CSRINFOCRO) 
4 032760 000001 002462 BIT @BITO, CSRINFOCRO) 
006222 001404 BEQ@ L2s 
3730 0062 112737 000105 066132 ae #'E,MSGO1S ;IT IS A MSV11-J 
0063 000403 BR L26 
34 L25:sssas3 
138 Ooaaa pose te: 112737 000120 066132 a MOVES #@'P,.MSGO15 ;IT IS A MSV11-L/P 
ooseas L26:isssse 
5714 006242 ELSE 
006242 000403 P BR L27 
é LOB :ssisee 
5715 112737 000040 “066132 MOVB @' .MSGO15 \} 
5716 ' END 
L27:sssse3 
5717 006252 TYPE MSGO15 ;TYPE MEMORY TYPE 
006252 104401 066132 TYPEIT ,MSGO15 





VMJABO MSV11-J 


CvMJ 
PRINT CSR REGISTER MAP 


$722 pone Eh 
006276 


5733 3 past rs 


fey DIAG. 


066130 


071542 
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TRACE: 


-DSABL_ CRF 
TYPE MSGO14 

TYPEIT ,MSGO14 

-DSABL CRF 





ADD #@2,RO0 
UNTIL RO EQ 040 
TYPE M™SGi29 
TYPEIT ,.MSGi29 
.OSABL CRF 


RET 
. WORD 


ee ee ee | 


;TYPE SPACE 


;POINT TO NEXT ENTRY 
; 


CMP RO, 040 
BNE 635 
ES:sssaas 


SEQ 0126 


SRINT CSR A REGISTE 


5726 006306 


5727 
572 
57 
57 
733 
133 
734 


: 
gi oe sas 


5736 SHE 


~~~ 
eno 


ie 


. 


oe au 


$758 006420 


010446 
010546 
013746 
C10005 
006205 
010537 
010337 


032760 
001403 


012705 
000402 


012705 


012737 
040537 


005015 


011304 
040504 


4° DIAG. 


177640 


002152 
002034 
000001 


017740 
070032 


177777 
002322 


002044 
002150 
000010 
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002462 


002322 


002462 





SEQ 0127 
SUBTST <<READ AND WRITE ALL CSR BITS>> 


§ SPSSSSSSESSSSSSSESSSSESSSSSESSAESSSSSSSHSESSHSSSSHHSSHHSASSHSHSSSESSSSSSOSSSESHEEEESES 


s*SUBTEST AD AND WRITE ALL CSA BITS 
| SESSESESSESESESESESESESESEOASEEESENSEESSSEEESESESEAESSESESEHESEEESEEEEESEEOOOESE 


; THIS ROUTINE “RWCSR“ CHECK TO SEE THAT THE CSR CAN BEWRITTEN ON CORRECTLY 
BY WRITING AND CHECKING FOR THE FOLLOWING PATTERNS: 


3 
$ 
5 i 

$ 2-ONE 

$ 3-SHIFTING A ONE THROUGH A FIELD OF ZEROS 
$ 4-SHIFTING A ZEROS THROUGH A FIELD OF ONES 


RWCSR: 
AND UIPARO ON STACK 
MOV RS, -( SB) 
HOV RS. (SP) 


UIPARO. 
;GET CSR NUMBER FOR POSSIBLE ERROR 
MOV RO.RS 


PUSH R4,R5,UIPARO ;SAVE R4,R5, 


-CSP) 


LET RS := RO 


ASR RS $ 
LET CSRNO := R5 5 

MOV RS,.CSRNO 
LET ADDRESS := R3 ;GET ADDRESS FOR POSSIBLE ERROR 


MOV R3,ADDRESS 
IF @BITO SET.IN CSRINFOCRO) ;WHAT KIND OF MEMORY IS THIS??? :;GET BIT MASKS FOR 
4 ied » CSRINFOCRO) 


LET RS := #017740 ;MASK FOR MSV11-J 
MOV #017740,R5 
ELSE :I1T IS A MSV11-L/P 
BR L32 
L3lsssssss 
LET RS := #070022 ;MASK FOR MSV11-L/P 
MOV #070032,R5 
END : 
L32:sssssa 
LET CSRiS :* #177777 ;SET CSRiS TO ALL ONES 


MOV @177777.CSRiS 
BIC RS,CSR1S ;CLEAR BITS FOR GOOD DATA 
(R3) := 00 0 >CSR 


CLR CRS) 
LET R4 := CRB) ;MASK OUT UNWANTED BITS 
MOV CR3),.R4 
BIC R5S,R4 $ 
IF R4 NE 80 300 WE HAVE A CORRECT READ 
TST R4 
BEQ L335 
LET GOOD := #0 ;GO00D DATA=0'S 
CLR GOOD 
LET CSR := R4 :;BAD DATA=CSR 
MOV R4,CSR 
ERROR +35 ;BIT SET ERROR 
i #BIT3,CSRINFOCRO) ;CLEAR CSR OK BIT 
L335:ssssas 


LET (R3) := CSRIS ;ONES--->(R3) 


Ty tae MSV 
READ AND 


20 
5759 006424 


URITE ALL 


6c 

na Ge * 

1065 7¢ 

788 00687 
106576 
5786 576 
76 


-J MEMORY 


ee ne ere 


OIAG. 


CSR BITS 


0135715 
005015 
001411 


013737 


005037 


005237 
012737 


Oa 7a7 
1003 
012702 
000402 


012702 


005237 
3727 


goioe 
o3i abe 
eoi0oe 


010215 


002522 


002264 
177777 
002264 


000001 


177776 
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002462 


177640 


— el 


SEQ 0126 


MOV CSR1S.(R3) 


LET R4 := CRS) ;MASK OUT CORRECT FIELD 


MOV (R3).R4 
CLR (R3) ;CLEAR OUT CSR 
BIC RS,.R4 3 
IF R4 NE CSRiS ;WAS PATTERN WRITTEN CORRECTLY? 
CMP R4 ,CSR1S 
LET GOOD := CSRiS ;GO0D DATA = ALL LEGAL BITS SET IN CSR 
MOV CSR1S,GOOD : 
LET CSR := R4 :BAD DATA=CSR | 
MOV R4,CSR 
ERROR +10 BIT CLEAR ERROR 
cup 82° @81IT3,CSRINFOCRO) ;CLEAR CSR OK BIT | 
; 
L34:ssssss | 
LET PASFLG := 00 ;SET UP LOOP COUNTER 
CLR PASFLG | 
REPEAT ;REPEAT WITH A FIELD OF 11s THROUGH 0'S 
B4: : © 
O'S THROUGH 1'S 
INC PASFLG INCREMENT LOOP COUNTER 
LET UIPARO := @-1 ;USE USER PAR FOR BIT COUNTER 
MOV @-1,UIPARO 
IF PASFLG EQ @1 ;PASS 1 
CMP PASFLG, ¢1 
BNE L35 
LET R2 := #1 iinones >FIELD OF ZEROS 
MOV #1,R2 
ELSE ;PASS 2 
BR L36 
L3S:ssssee 
LET R2 := 0177776 ;0----- >FIELD OF ONES 
MOV #177776.R2 
END 3 
L36:sissse 
REPEAT ;00 BITS 0-4 AND 13-15 


S: 
INC UIPARO ;INCREMENT BIT POINTER date 
IF PASFLG EQ @1 AND @BITO OFF.IN CSRINFOCRO) ; 
CHP PASFLG, #1 
BIT 6BIT0,CSRINFOCRO) 
LIF THIS IS PASS 1 ON A MSVI1-L/P,CLEAR BIT 14 
L3O7:sssssss 
IF PASFLG EQ @2 AND @BITO OFF.IN CSRINFOCRO) , 
CMP PASFLG. @2 
BNE L40 
BIT #BIT0,CSRINFOCRO) 
;IF THIS IS PASS 2 ON A MSV11-L/P, CLEAR ECRSRD BIT AND 
L4O:ssssee 
MOV R2,(R3) 






or 


BIC @#6IT14,R2 
NO 


BIC @BIT14!B1IT2,R2 
NO 5 


LET CR3) := R2 sWRITE DATA 


Sy Ag tS ae 
5767 006600 
3789 


791 





5792 ¢ 
S793 0 
S794 0 
5795 . 
79% 0 


3197 . 








Y OIAG. 


CSR BITS 


sist 
sate 


002150 


090010 


177640 


140005 


037772 
140005 
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000017 





LET R1 := R2 :GET GOOD DATA AND MASK IT OuT 
MOV R2,.R1 
BIC RS.R ;GET GOOD DATA 
LET R4 -_ CR3) iGET DATA THAT IS READ 
MOV CRS).R4S 
BIC RS.R4 sMASK OUT CSR BITS 
IF Ri NE R4 :IS DATA CORRECT??? 
SEQ tai 
LET GOOD := R1 ;BAD DATA = CSR CONTENTS 
MOV R1.GO0D 
LET CSR := R4 :;GET GOOD DATA 
MOV R4.CSR 
IF PASFLG EQ @1 ;SELECT ERROR DEPENDING ON PASS 
CMP PASFLG.#@1 
BNE L42 
ERROR +35 ;BIT SET ERROR 
ELSE sPASS 2 
BR L435 
L42:ssssas 
ERROR +10 ;B8IT CLEAR ERROR 
ENO L4O3S:sssias 
> ne @BIT3.CSRINFOCRO) ;CLEAR CSR OK BIT 
3 
L4isssssas 
IF PASFLG EQ @1 :;GET DATA FOR NEXT LOOP 
CMP PASFLG, #1 
BNE L44 
ASL R2 sSHIFT 1 ACROSS O'S 
ELSE $ 
Lee BR L45 
23885388 
SEC :;SET CARRY 
— R2 sROTATE A O ACROSS A FIELD OF ONES 
3 
L4S:sssasa 
UNTIL VIPARO EQ #15. ;UNTIL ALL BITS ARE DONE 
CMP UIPARO,. 615. 
BNE 6S 
ES:ssssses 
UNTIL PASFLG EQ@ @2 sDONE WITH 2 PASSES 
CMP PASFLG, @2 
- BNE B64 
23833 i3™ 
IF @BITO SET.IN CSRINFOC(RO) THEN JUMPTO DONE ; IF MSV11-L/P DO ONE LAST WRITE 
arT 1. \frleeeamaatamaaaaid 








\WRITE ONES TO CSR WITH Ecsaad Att ENABLED 
HOV 140005, (R3) 
;READ CSR FOR CORRECT BITS 


MOV CR3),R2 
sCLEAR UNWANTED BITS 
;WAS WRITE CORRECT 


LET CR3) := #140005 
LET R2 := CRS) 


BIC #37772,R2 
if R2 NE #140005 





CHP R2, 0140005 





SEQ 0129 


: ee a ee eee Oe ee Oe 


614 001411 
012737 
5615 
0 7 
pais Sates His 
8 
5619 
005015 
5820 
4 7 
0 
$621 7 





140005 
002150 
000010 


177640 


002044 


LET GOOD := #140005 


LET CSR := R2 


ERROR +10 
oo” BITS .CSRINFOCRO) 


LET CRB) := 00 
POP UIPARO,RS,R4 


RETURN 


:G000 DATA 

sBAD DATA 

;8IT CLEAR ERROR 
;CLEAR CSR OK BIT! 
: 


sCLEAR OUT CSR 


:RESTORE UIPARO.R4, AND RS 


ee = 


BEQ LS1 
MOV #140005 .G000 
MOV R2.CSR 


LSi:ssssas 


CLR (RS) 
MOV (SP)-, ARO 
MOV ( 3: yup 
MOV (SP)>_R4 


SEQ 0150 
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SEQ 0151 
; THE FOLLOWING ROUTINE DETERMINES WHICH CSR CONTROLS PROGRAM SPACE 
















007002 1 éTesT: CACHOFF 
5827 007004 012737 177777 002532 MOV 0177777 PGMCSR 
1 007012 012737 002000 172350 MOV #2000, KIPAR :SET UP MAP REGISTER 
007 012701 002412 MOV eTESTADD. Rl 
> 007 0 73 100000 002412 MOV @1 , TESTADD 
007032 012737 100002 002414 MOV #100002. TESTADD+2 
007 CLR RO :CLEAR CSR COUNTER 
00704 37 002152 CLR CSRNO 
007 613703 002224 MOV TOTCSRS,R3 ;OBTAIN CSR MAP 
007 NOP DEBUG AID 
007 3 4s: ASL R3 ;PUT HIGH ORDER BIT INTO C BIT 
007 103407 Bcs 2% ;BRANCH IF CSR EXISTS 
007 700 000002 18: ADD 62,RO ;UPDATE CSR COUNTER 
007064 010037 002152 MOV RO, 
> 007070 005703 TST R3 ;IS MAP EMPTY? 
007072 001465 BEQ 3$ BRANCH IF SO 
00707 767 BR as 
007076 ¢00240 28: NOP ;0EBUG AID 
3844 0071 900241 CLC ;CLEAR CARRY 
5 007102 032760 000001 002462 BIT @BITO, CSRINFOCRO) :IS THIS PARITY MEMORY? 
$846 007110 001014 BNE S$ ;BRACH I 
$847 OO7112 052760 000004 172100 ers @B1IT2,CSRADD(RO) ‘SET WRITE WRONG PARITY 
007 012771 123456 000000 MOV 0123456, ) ;WRITE DATA 
5 7126 77 1234 000002 MOV #123456, a2(R1) 
850 007154 005060 172100 cLR CSRADDCRO) sRESTORE CSR 
8: 007142 012760 172100 S$: MOV ;CLEAR THE CSR UNDER TEST 
: 7150 012771 123456 MOV ;WRITE DATA 
7156 012771 1234 MOV 
7164 012760 172100 MOV :SET DIAG CHECK MODE 
$856 007172 771 63: TST ac ; WRITE CHECKBITS TO CSR 
y 907 ? 016004 172100 MOV C TO R 
x q 08 760 000001 002462 BIT a6 
586C 607 : 003708 ° A R4 
$861 007214 100412 BMI Bs 
007216 720 BR i$ 
907 900240 7$: NOP 
7 07242 177773 ASH @-5.R4 
007 704 177700 BIC 6tC77.R4 
007 012702 000040 MOV 040,R2 ;LOAD IN CORRECT CHECK BITS FOR MSV11-J 
007 CMP R2,R4 ;CORRECT CHECKBITS? 
007 15 ? BNE is ;BRANCH IF NOT 
007 610037 002532 8s: MOV RO, PGMCSR 
> 007 33: NOP ;DEBUG AI 
007 104 CLRCSR ;CLEAR ALL CSR'S 
007 012771 0v0000 000000 MOV 00, a(R1) ;RESTORE TEST LOCATIONS 
007 012771 000000 000002 MOV #0, a@2(R1) 
007 727 002532 177777 CMP PGHCSR, 6177777 
007274 001402 BEQ FINT ;IF PROGRAM CSR NOT FOUND GO TO FINT 
007276 0001 007320 JMP CLAEM :60 TO SIZING ROUTINE IF FOUND 
007 012787 001000 172350 FINT$: MOV @1000 ,KIPAR4 
78 00731 TYPE MSG126 ‘ERROR - PROGRAM CSR NOT FOUND! 
0073 104401 071334 TYPEIT arisciz6 





a mee me 


— ee ae 


i ie 


CvMJABO MSV11-/ MEMORY DIAG. 


58661 007520 


-—_ 


012737 
005037 


READ AND WRITE ALL CSR BITS 
$879 007314 005037 


002532 


006304 
000001 
002000 


100000 
117776 
177777 
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CLR PGMCSR :SET TO DEFAULT OF 0 


SUBTST <<CLEAR ALL MEMORY SPACE FROM BANK 2 ON>> 


; *SUBTEST CLEAR ALL MEMORY SPACE F 


SESSSS SESSESSSESASSESSESSSESHSSESSESSESESSSEHSSSESSSESSESSSESSESSSSSSSEEEHESSSESEEESEEESEEEEEE 









; THIS ROUTINE CLEARS ALL MEMORY SPACE BEGINNING AT ADDRESS 200 AND 
:CONTINUES UNTIL THERE IS NO MEMORY LEFT. IT SHOULD CLEAR ANY any Bantry ERRORS 
;CREATED BY THE LAST ROUTINE, AND CLEAN UP ANY JUNK LEFT HANGING AROUND IN 
;HIGHER MEMORY . 
CLRMEM: SET4  @CLREX ;NONEM TRAPS GO TO CLREX 

MOV @CLREX.4 

> CRF 

CLR TRACE 

MOV @1,NOPAR ; IGNORE PARITY ERRORS 

MOV 2000 ,KIPAR4 ;SET UP MAP TO START AT BANK 2 

MOV #100000 ,R1 ;R1 MAPS TO KIPAR4 
is: CMP R1, 0117776 ;WHOLE 16K B 

BNE ;KEEP GOING IF NOT 

MOV @-1, TRACE ;USE TRACE FLAG TO FLAG END OF BANK 
2%: CLR }. ;CLEAR CONTENTS & INCREMENT 

TST TRACE ;€08 FLAG SET? 

BNE 3s ;GO TO NEXT BANK IF SO 
3$: ADD #200 ,KIPAR ;SET MAP FOR NEXT BANK 

CMP #177600, KIPARG ;ARE WE AT THE PERPHERIAL PAGE 

BEQ CLREX ;YES-GO 

CLR TRACE ;RESET FLAG 

MOV @100000,R1 ;RESET Ri 

BR 1$ ;CLEAR NEXT BANK 
CLREX: NOP 

CLR TRACE 

RES4 

MOV @TIMEQUT 4 

CMP TYP ;IS THIS AN 11/83/84 ? 

BNE 10 Yn : H IF NOT 
bial CLR CPUE ;CLEAR OUT THE CPU ERROR REGISTER BITS 


; THAT A EXPECTED TRAP COULD HAVE SET 


SEQ 0132 
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CLEAR ALL MEMORY SPACE FROM BANK 2 ON SEQ 0133 
5911 007460 ANA2: SUBTST <<MATCH ALL CSR‘S WITH MEMORY>> 
| COOSOSESEES EE SEESSEESEESASEEESSEESESESESEESESESESESEHEEEESSSEEHEKESEHOHESOHOOEES 
: *SUBTEST MATCH ALL CSR'S WITH Y 
oe eo eC oa TY Een Oe ee 
et ;@ THE SECOND PART OF THE ANALYSIS MATCHES UP THE CSR‘S WITH THE Y 
91 ;@ INSTALLS ALL THE INFORMATION FOUND IN THE CONFIGURATION TABLE. FOR é c. 
914 3;@ THIS IS DONE BY TAKING EACH CSR HE SECTION SEQUENTIALLY 
915 3¢ a ALL 8 T WHICH 6B 
916 3¢ To T CSR IN QUESTION. THE FIRST DOUBLE WORD PAIR IN EACH BANK IS 
44 ;@ WRITTEN WITH gl AND DIAGNO SET AND CHE 
16 34 ACH B TRUCTION PAGE ADDRESS 
a ;* REGISTERS 4 AND 5S. IF GET T VE A MATCH. 
3@ IF NOT, THE TINE CHECKS FOR SINGLE OR DOUBL 


F ROU 
;¢@ IF ONE OR THE OTHER IS FOUND, THE ERROR 
;@ TO SEE IF IT IS THAT BANK. IF IT IS, AT THE END OF EACH 
;@ BANK PASS, FOR EACH CSR PASS, THE PROGRAM COMES uP "Grin A NUMBER, STORED IN 
;@ “I”, WHICH DENOTES THE FOLLOWING: 













34 I MEMORY DESCRIPTION 
3% -_ jj — —_—<_—_<—<_ err n ren nnnnne 
rv ry NON-EXISTANT MEMORY 
:6 1 MSV11-L/P MEMORY 
;6 2 MSV11-J MEMORY 
= 
3 
;@ NOTE THAT PARITY MEMORY WRITES WRONG PARITY TO THE DOUBLE WORDS. THEN LOOKS 
934 ;@ FOR THE PARITY ERROR BIT TO BE SET. IF THE BIT IS SET, WE HAVE A MATCH. 
3% 
936 007460 SETA 1008 ;NE MEMORY TRAPS GO TO 100% 
007460 012737 010532 000004 HOV #1008 ,4 
937 007466 005037 002314 CLR CHECK ;CLEAR CHECK 
007472 012701 002412 MOV @TESTADD,R1 ;SET UP THE VIRTUAL ADOR. POINTER 
939 007476 013703 002224 MOV TOTCSRS,R3 ;MOVE CSR MAP INTO R3 
940 00 CLR RO ;CLEAR THE CSR POINTER 
00 CLR R5 ;CLEAR THE PROGRAM CSR STATUS POINTER 
007 737 002454 TST NO22B1T ;00 WE HAVE 22 BIT ADDRESSING ? 
94 90 12 001403 BEQ 78 ;BRANCH IF WE DO 
944 4 37 002560 CLR LASTBLOCK ; ADJUST LASTBLOCK INDICATOR FOR 124K MACHINE 
945 90 000413 BR is ;BRANCH OVER NEXT PIECE OF C 
946 022737 000177 002556 73: CMP #177, LASTBANK SIS THERE Q-BUS MEMORY ABOVE 17776000? 
947 00 001407 BEQ 18 :BRANCH IF NOT 
00 32 013702 002556 MOV LASTBANK,R2 SET UP A NEW LAST BLOCK INDICATOR 
349 00 INC R2 
00 07 000011 ASH 09. .R2 
00 010237 MOV R2,LASTBLOCK 
00 000004 18: MOV 04.R2 ;R2 IS INDEX FOR CONFIG TABLE 
007 002564 CLR ENDFLG OF MEMORY FLAG 
00 012737 0v1000 172350 MOV $1000, KIPAR4 
5 00 012737 001000 172352 MOV @1000.KIPARS 
007574 303 2%: A R3 
007576 10 acs 33 
007 062700 000002 ADD @2.RO0 ;INCREMENT THE 
9 007604 010037 002152 MOV RO.CSRNO i STORE IT IN CSRNO AL 
960 007610 703 TST R3 ;ARE T ANY MORE 
961 007612 001370 BNE 23 BRANCH IF ALL CSRS NO 
$962 007614 012737 001000 172350 MOV #1000, KIPAR4 RESTORE KIPAR4 





- EE EE LS LL 
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SATOH ALL CoA’ S WITH MEMOR _ 











Y SEQ 0134 
5963 007 012737 001200 172352 MOV #1200, KIPARS ;RESTORE KIPARS 
5964 0076 013706 002574 MOV KSTACK , SP ;RESTORE STACK 
$965 007634 37 010542 JMP SUBAAS ; JUMP TO SUBAAS IF ALL CSR’S ARE DONE 
007 010037 002152 3s: MOV RO, CSRNO ;MAKE SURE CSRNO IS UBDATED 
967 007644 1osaza 138: CACHOF F ;TURN THE CACHE OFF 
007650 012737 100000 002412 453: MOV 100000, TESTADD ;SET UP VIRTUAL ADORESS TO KIPAR4 
970 0076 012787 120002 002414 MOV 120002. TESTADD+2 ;SET UP VIRTUAL ADCRESS TO KIPARS 
97 007664 032762 000040 002664 BIT @B1TS, CONF IG(R2) ;IS THIS A BANK TO SKIP ECC/LOGIC Tests? 
97 007672 BEQ 433 ;NO - BR AROUND NEXT INSTRUCTI 
007 137 010430 JMP 63 ;YES - GO TO END OF 
4 007700 005037 002452 43%: CLR I ;CLEAR THE MEMORY CONFIGURATION COUNTER 
75 007704 00577 000000 43: TST acRi) ;TEST TO SEE THAT THERE IS MEMORY PRESENT 
76 007710 37 002452 INC ;MEMORY PRESENT 
77 007714 PUSH a@(R1),@2(R1) ;SAVE THE LOCATIONS UNDER TEST 
007714 017146 000000 MOV @(R1),-(SP) 
0077 017146 000002 MOV @2(Ri), -(SP) 
978 007724 032760 000001 002462 BIT @BITO, CSRINFOC(RO) ;IS THIS PARITY MEMORY? 
979 007732 001014 34% ;NO - BRANCH 
007734 C52760 000004 172100 BIS @B1T2, CSRADD(RO) SET WRITE WRONG PARITY 
1 007742 012771 123456 000000 MOV @123456,a(R1) ;SET THE FIRST LOCATION UNDER TEST 
007750 012771 123456 000002 MOV #123456, @2(R1) SET SECOND L 
0077 095060 172100 CLR CSRADO(RO) 1 OEE AR 
0077 ii BR 41% ;TEST LOCATIONS 
S 007764 012771 123456 000000 34%: MOV 0123456, a(R1) ;SET THE FIRST LOCATION UNDER TEST 
007772 012771 123456 000002 MOV #123456. a2(Ri) ;SET THE SECOND LUT 
010000 50 CLRICSR ;RESET CSR 
010002 104475 icCSR ;SET DIAG. CHECK MODE IN CSR UNDER TEST 
969 01 40 ; DEBUG 
010006 oos771 000000 ais: TST acRi) ‘READ THE FIRST LUT TO WRITE CKBITS. INTO CSR 
991 010012 104426 READCSR ;READ THE CSR UNDER TEST 
992 010014 40 NOP ;DEBUG AID 
99 910016 013704 002150 HOV CSR,R4 ;GET THE CHECKBITS FROM THE CSR 
002 tg 3 
395 01 010437 002434 MOV R4, TEMP ;SAVE IN TEMP FOR LATER 
996 010030 104503 CLRiCSR ; 
997 0100 @2(R1),a@(R1) ;RESTORE LOCATIONS UNDER TEST 
010032 012671 000002 MOV (SP)+.@2(R1) 
0100 012671 000000 MOV (°°)+.@(R1) 
5998 010042 000001 002462 BIT @BITO,CSRINFOCRO) ;IS THIS PARITY MEMORY? 
999 010050 001004 BNE 423 ;NO - BRANCH 
6000 O1 704 TST R4 ;DID WE GET A PARITY ERROR? 
6001 01 100420 BMI 253% VES - FILL IN CONFIG TABLE 
01 000137 010430 JMP 63 JUMP TO END OF BANK 
6003 010062 072427 177773 428: ASH @-5,R4 MANIPULATE THE CSR BITS 
6004 010066 042704 177700 BIC OtC77,R4 ;INTO A USABLE FORM. 
6005 010072 012737 000040 002316 MOV 40,CBITS ;MSV11-J CHECK BITS 
6006 010100 0 NOP ;DE ING AI 
6007 010102 023704 0v2316 77%: CMP CBITS.R4 ;DO THE CHECKBITS COMPARE TO WHAT WAS WRITTEN? 
6008 010106 000240 NOP DE AIDE 
6009 010110 001402 BEQ 253 ;BRANCH IF THERE IS A MATCH 
6010 010112 000137 010256 JMP 22% ;ELSE BRANCH IF NOT THE SAME 
;* 
6012 ;@ WE COME HERE IF THERE IS A MATCH 
3* 
6014 010116 010004 25%: MOV RO,R4 ;GET THE CSR NUMBER 


6015 010120 000240 NOP ; 





A A TTT ee = + - 


-_—- — 


CVMJABO font? 
MATCH ALL CSR’‘S 


6016 010122 
6017 010124 


010 
010372 
010374 


S255 SESRGRORGIEE SEESEREESERE 


J MEMORY 


DIAG. 


WITH MEMORY 


000304 
042704 
050462 
016004 
042704 
000304 
050462 


105262 


038737 
053737 
000240 


900865 
032737 
001001 


013704 
042764 


170377 
002664 
002462 
177770 
002666 
001000 
0104350 
100020 
002434 
177767 
000001 
000001 
002666 
177777 
002670 
002672 


100020 
002152 
000006 
172100 
177773 
177600 
040000 
172100 
040000 
177037 


000005 
172350 
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172350 


002434 


002664 


002450 
002664 
002666 


002150 


172100 


172100 
172100 


15%: 


243: 


108: 


223: 


27$: 


ASR R4 ;SET IT UP FOR USE IN THE 
R4 ‘CONFIGURATION TABLE. 
BIC @170377,R4 ;CLEAR OFF EXTRANEOUS BITS 
BIS R4, CONFIG(R2 ;PUT CSR NUMBER IN CONFIG. TABLE 
MOV CSRINFOCRO). 2, TYPE 
BIC 6tC7,R4 ;CLEAR OFF THE EXTRANEOUS BITS 
SWAB tiCéRR ;MOVE INTO PROPER POSITION 
BIS R4, CONFIG+2(R2) ;SET IT INTO THE CONFIG TABLE 
pes 


i THIS SECTION IS EXECUTED ONLY WHEN THE BANK=1 
* 


CMP #1000 ,KIPAR4 ;IS THIS BANK 1 ? 
BEQ 30% ;BRANCH IF TRUE 
JMP 63 ;ELSE JUMP TO END OF THIS BANK 
BIT @B1IT15!B1T4, TEMP ;WAS THERE A SBE OR DBE? 
BEQ 10% ;BRANCH IF NOT 
MOV TEMP ,R4 ;GET CSR CONTENTS 
ASH @-9..R4 ;MAKE ERROR ADORESS INTO BANK @ 
CMP 01,R4 ‘ERROR IN BANKS © OR 1 
BGT 10$ ;BRANCH IF NOT 
BIS @B1ITO, CONFIG(R2) iSET ERROR FLAG IN CONFIG TABLE 
INCB  CONFIG+2(R2) ONE TO BANK ERROR COUNT 
SET CONFGERROR + ORINT CONFIG TABLE 
MOV #@-1,CONFGERROR 
BIS CONFIG+4, CONFIG ;SET UP INFORMATION IN BANK ZERO 
BIS CONF IG+6, CONFIG+2 
NOP ;DEBUG AID 
BR 6$ ; BRANCH 
;* 
;@ IF CHECKBITS DID NOT MATCH, WE COME HERE 
3% 
BIT @B1T1S5!81T4,CSR E OR DBE FLAGS SET? 
BNE &§ ;BRANCH IF TRUE 
BR 6% ;CHECK TO SEE IF IT IS MSV11-J 
MOV CSRNO,R4 ;GET CSRNO 
BIC #6, CSRADD(R4) ;TURN OFF DIAG CHECK & ECC DISABLE 
PUSH Ri ;SAVE RO & R1 
MOV RO, -CSP) 
MOV Ri, -CSP) 
MOV CSRADD(R4), RI ;GET CSR INFORMATION 
ash #-3.R1 ;SET UP ERROR ADDRESS 
eis eBITi4 CSRADDCRA) ;GET EXTENDED ERROR ADDRESS BITS 
MOV CSRADD(R4) RO ;READ FROM CSR 
BIC @B1T14, CSRADD(R4) ‘TURN OFF EQB BIT 
BIC tC 740,RO ;SET UP EXTENDED BITS 
ASL RO 
ASL RO 
ADO RO,R1 ;SET UP TOTAL ERROR ADDRESS 
MOV R1i,R4 ;SAVE IN R 
POP Ri.R ;RESTORE RO E R1 
MOV $29 at 
MOV (SP)> 
ASH RS ;SET ERROR ADDRESS UP IN PAR SOTATION 
CMP R4.KIPAR4 :D0ES IT TECUAL KIPAR4? 
BNE 28$ :BRANCH IF FALSE 
BR 35$ sYES - MARK INFO IN CONFIG TABLE 





SE@ 0155 


CVMJABO MSV11 


-J MEMORY DIAG. 


MATCH ALL CSR‘S WITH MEMORY 


6068 010376 

9 010402 
6070 010404 
6071 010412 
6072 010416 
6073 010424 
607 


sn nes 


172352 


000001 
002666 


177777 
010116 


002564 
001000 
172350 
177000 
177777 
007650 
007650 
000002 
007550 


000004 
010430 
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002450 


28%: 
35%: 


6%: 


70%: 


19%: 


CMP «R84. KIPARS 
BNE 68 
BIS  @BITO,CONFIGCR2) 
NCB CONF IG-2(R2) 
CONFGE 
UMP 25% 
ax 
FeEND OF BANK ROUTINE 
ca 
ELRICSR 
TST 


CMP #177000 ,KIPAR4 
BNE 70$% 
SET ENOFLG 


JMP 45$ 

CMP LASTBLOCK ,KIPAR4 
BLOS 19$ 

JMP 45$ 

ADD #2,R0 

NOP 

CACHON 

JMP i$ 

ADO #4,SP 

JMP 6$ 


ee ee 


SEQ 0156 


;D0ES IT so. KIPARS? 
A 


;BRANCH IF 

iSET BANK "tae LAG 

; INCREMENT BANK ERROR COUNTER 
:;PRINT CONFIG TABLE 


MOV 
;YES - MARK INFO IN CONFIG TABLE 


@-1,CONFGERROR 


;CLEAR THE CSR UNDER TEST 
;ARE WE AT TOP OF MEMORY? 
VIF SO THEN EXIT 


;UPDATE CONF 
;UPDATE KIPAR4 TO NEXT 
AND UPDATE KIPAR4 


IGURATION POINTER 
BANK 


T 
;WERE AT LAST BANK 


MOV @-1,ENDFLG 


SHAY E WE DONE THE WHOLE MEMORY “—e 
a4 DONE R-C 


; JUMP IF NOT DONE 

S INCREMENT CSR POINTER 
;DEBUG AID 

;TURN ON THE 


CACHE 
; JUMP TO TRY NEXT CSR 


sRESTORE STACK 3R-C 
:;GO TO END OF BANK ROUTINE 3R-C 


— = = 


$3 


set try seer 
KP Oove~Quvawlh 


AAAAAAAAVRDHA 
ee eee er oy 


6128 


-J MEMORY DIAG. 
S WITH MEMORY 
104423 
104472 
000004 
seaeey steers 
005037 002070 
012737 1 
012737 035736 
005000 
012701 040000 
104424 
005720 
077102 
104423 
005737 002072 
001403 
005237 002064 
104003 
00573" 002070 
00140 
162737 000002 
005237 002064 
104004 
053737 002106 
012737 pts | 
022737 
oo aoes 
005037 177766 
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002034 


004064 


pie SURE T IS ON 
ON DOUBLE BIT ERRORS CNORMAL ) 


SEQ 0157 
HE CACHE 


3 TRAP 
<<TEST BANK 0 ACCESSES>> 
$ PSOSEESSSESEEEEESESESESESERESEEEEESESESELERESEHESEEASE SEES SEEESEEESEREESDEREDEEES 


{ SSSSSSESSSASASESERAASESSSSSESSSASSSSSSSSESSAEHSSHESESASEHHSSSHSESSEEKSSEESESHSSHEEEEES 


S A “TST” i h LE ON EVERY LOCATION IN BANK #0 TO SEE 


APs. 
sSINCE EVERY yl 15 erTHER 1 LOADED OR WRITTEN INTO BY THE a 


ARITY ERROR IMPLIES THAT THERE IS A | 


; HARDWARE URE IN THE MEMORY 
THESE ERRORS ARE COUNTED AND A “FATAL ACTION IS. 
éLR PARCN EAR P 


STRAPS TO 4 GOTO NONEXIS 


sTURN CACHE OFF 
;SEE IF I CAN DO A READ ACCESS WITHOUT A PARITY TR 


; TURN CACHE ON 
;ANY PARITY ERRORS? 
;NO - SKIP 
;SET FATAL INDICATOR 
oe Niue MEMORY CHOLES)? 
: 
;UPDATE iST ADDRESS FAILURE FROM AUTO INCREMENT @ 
:;SET FATAL INDICATOR 
;SET CORRECT ACCESSED BIT ON BANK O 
;RESET TRAPS TO 4 TO DEFAULT 
:1S THIS AN 11/83/84 ? 
;BRANCH IF NOT 
;CLEAR OUT THE CPU ERROR REGISTER BITS 


; THAT A EXPECTED TRAP COULD HAVE SET 


SUBAAS: C 
ECCINIT 
NEWTST 
s#TEST 2 TEST BANK O ACCESSE 
TST2: COPE 
; THIS DOE 
VIF IT GETS ANY PARITY T 
sPRIOR TO THIS P 
FAIL 
T 
MOV #1,NOPAR 
CLR NEMCNT 
MOV 41, 
SET4 @NONE X 
MOV @NONEXIST,4 
.DSABL CRF 
CLR RO 
MOV @#SIZE,R1 
CACHOFF 
i$: TST CRO)+ 
on | 
;SEE IF ANY FAILURES 
ST PARCNT 
iA} 2s 
FATAL 3 
INC FATAL$ 
ERROR 3 
-OSABL CRF 
2s: TST NEMCNT 
BEQ 3¢ 
SUB #2, ADDRESS 
FATAL 
INC FATAL$ 
ERROR 4 
.OSABL CRF 
3$: BIS CPUBIT , CONFIG 
RES4 
MOV ore 3" 
CMP #5,PROTY 
BNE 101% 
CLR CPUERR 
1018: 
DSABL CRF 
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6129 010706 SUBTST <<ENABLE ECC FOR CORRECT TRAPS>> 
P| SSESSHSSHSSSESSSSESSSSASASSSSSSSSSASASSSSESSSKESSEAAKSESEESESSEEEKEEAEESESEEEKEESEEEEEEEED 
| sSUBTEST ENABLE ECC FOR CORRECT TRAPS 
3 SESSKSSSHSEASSEASEESEESEAHEEKSEAKEEODEEEEEEEOEEEESEEKAESDEEEEKEEBEKOEKESEOEEEEEEEEEEEEESD 
6130 010706 IF @SWO SET.IN @SWR OR ACTFLAG IS TRUE 
010706 032777 000001 171722 BIT @SWO,eSUR 
010714 00100 BNE 
Oto7t6 008737 002350 TST ACTFLAG 
910722 001402 BEQ LS3 
0107 LS2: 
6131 010724 104506 ENASBE ;TRAP ON SINGLE BIT ERRORS 
6132 0107 ELSE 
010726 000401 BR LS4 
0107 Exreett 
6133 010730 104472 ECCINIT ;TRAP ON DOUBLE BIT ERRORS CNORMAL) 
6134 0107 END ;0F IF @Swo 


01073 LS54:sssea3 


AL A _ — 
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CvMJ MSV1ii- MORY DIAG. 
ENABLE ECC FOR “CORRECT TRAPS SEQ 0159 


= 


6137 010732 NEWTST <<TEST BANKS 1-200 (OCTAL) FOR ZEROS & ONES>> 
, seas aesanas “<a ie La te st: 
;*TEST 3 TEST BANKS 1-200 COCTAL) F 
£26664666646666 664866666 26466622642046666 666% 6066664666466866666660646664646400646666064666466466 
010732 000004 + SCOPE 
6138 ;EACH BANK IS TESTED FOR EXISTANCE AND IF IT EXISTS 
6139 ‘THEN IT IS TESTED FOR ZEROS & ONES. 
; 
6141 ; PROTECTED BANKS (WHERE THE PROGRAM IS) ARE ONLY TESTED BY | 
614 ; “TST” INSTRUCTIONS LIKE BANK 0 | 
614 ;ANY BAD BANKS ARE L HE CONFIGURATION TABLE. | 
6144 ‘THIS ROUTINE IS ONLY DOING «y SMART SIZE - NOT ACTUAL TESTING! | 
6145 010734 005037 002102 CLR BANK | 
6 010740 012737 000001 002076 MOV #1,NOPAR ;SET NO PARITY ERROR FLAG 
6147 010746 012737 000002 002100 MOV @2. NONEM ;SET NON-EXISTANT MEMORY MODE TO EXIT TEST LOOP 
61 10 SET4 § @NONEXIST ;TRAPS TO 4 GOTO NONEXIST 
010754 012737 033736 000004 HOV @NONEXIST 4 
6149 010762 012757 011506 002522 MOV @MTST3+4,LINK1 ;SET UP LINKS 
6150 010770 C12737 011510 4 MOV O@HTST3+6.LINK2 
6151 010776 37 102 TAG9$: INC BANK 
6152 O11 023737 002556 002102 CMP LASTBANK, BANK ; DONE? 
6153 011010 103451 BLO TAG2$ ;YES - SKIP TO NEXT TEST 
6154 011012 013701 002102 MOV BANK ,R1 
6155 9110 006301 ASL R1 
6156 O11 00630 ASL R1 ;BANK « 4 
6157 O11 010137 002104 MOV R1, BANKINDEX 
6158 01 oases? 002074 CLR PATERR ;CLEAR PATTERN ERROR COUNTER 
6159 011032 005037 002072 CLR PARCNT ;CLEAR PARITY ERROR COUNTER 
6160 011036 005037 002070 CLR NE ;CLEAR NON-EXISTANT MEMORY COUNTER (HOLES) 
6161 011042 MAP ;MAP SUPERVISOR SPACE (TEST AREA) TO BANK 
01104 010346 MOV R3, -(SP) 
011044 013703 002102 MOV BANK ,R3 
011050 004737 03 CALL MAPPER 
-OSABL CRF 
011054 012603 MOV (SP)+,R3 
6162 ou 105761 002664 TSTB #§CONFIGCR1) ;IS THIS BANK PROTECTED? 
6163 O11 100542 BMI TSTBANK ;YES - TEST BANK SPE 
6164 011 012777 000207 171430 WARNi: MOV 6207, @LINK1 ;PUT “RETURN” INSTRUCTION AFTER WRITE ROUTINE 
6165 011072 012700 MOV @F IRST RO 
6166 011076 01 MOV RO,R4 
6167 011100 012701 040000 MOV @SIZE.R1 
6168 011104 01010 MOV R1,R3 
616 011106 CLR ;DATA IS ZEROS 
6170 011110 104424 CA iT ACHE OFF 
6171 Oilii2 TESTAREA ;ENTER SUPERVISOR MODE 
Oll1i2 053737 002552 177776 BIS TESTMODE ,PSW :GO TO SYSTEM TEST MODE 
6178 011120 004737 011502 CALL  MTST3 
6175 011124 104417 2%: KERNE ;ENTER KERNEL MODE 
6174 011126 104423 c ;TURN CACHE ON 
6175 011130 00024 NOP 
6176 011132 000416 BR TAG3$ ;SKIP NEXT INSTRUCTION 
6177 011134 005037 002102 TAG2$: CLR BANK 
6178 011140 RES4 ;RESET TRAPS TO 4 TO DEFAULT 
011140 012737 034002 MOV @TIMEOUT,4 
011146 022737 000005 004064 CMP #5, PROTYP :IS THIS AN 11/83/84 ? 
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FYTABO ENP dace 1 200 COCTAL) FOR ZEROS € ONES 
a 1015 Teen OUT The REGISTER BITS 
011134 001002 CPUERR :CLEAR OUT THE CPU ERROR 
eee 1018: THAT A EXPECTED TRAP COULD HAVE SET 
011162 ; nN 
eck MOPAR sINDICATE DEFAULT PARITY AC 
1162 005037 002076 4 
6186 Stites 900357 3s: TST —NEMCNT :ANY TRAPS? 
61 _— RAP 
6181 011170 005737 002070 BEQSsiéd*'S tNDM - TRY NEXT BANK 
6188 011176 90067 on menisis STURN CACHE OFF 
SHES Sitges Settee Hime ee Ee Te rest rove 
6165 Oi S TESTMODE .PSW GO 
= O11 053737 002552 177776 BI 
.OSABL St INK2 ;FINISH PATTERN 
11210 004777 171310 CALL SENTER KERNEL 
e187 o1iaie 104417 ; TURN CACHE 
104423 : 
$189 011220 000 st _—- PATERR :ANY PATTERN ERRORS 
i $1 005737 002074 2§ ; YES . 
: oa8 TST BARCNT ANY PARITY ERROR 
$192 of 737 002072 os 8 oat :YES - SKIP is 
oies ot 001027 - a ae sANY NON EXISTANT ME 
: 94 6 0057 7 002070 ane $ YES - SKIP 
$195 Stisas 00102 MOV OFIRST,.RO 
6196 011244 012700 060000 wy 4 
$197 01 Gi 040000 MOV @SIZE,R1 
$199 Of 010108 - i Se :DATA IS ONES aco saiaeibiaaia 
6200 011260 013702 002614 ay 340, 8LINK1 :PUT “NOP” INSTRUCTION B 
011364 012777 000240 171230 MOV —_ @000240, 2 ly tl 3: 
gigi tos TESTAREA sENTER "G0 TO SYSTEM TEST MODE 
011274 1s TESTMODE .PSW i 
6205 O11274 0S3737 002552 177776 Bis alee 
CALL Ss MTST3 ‘D0 IN MEMORY IF N 
6204 011 004737 011502 x ENTER KERNE 
O11810 iosazs : DEBUG AID 
Q11310 104425 CAE re AtDY 
011814 013700 002104 o0ClCUe. ANY PATTERN ERRORS? 
011 005737 002074 TS 38 YES - . 
4 7st PARCNT SANY PARITY ERRORS 
a, oii 005787 002072 TS 33 ;YES - SKIP 
13 O11882 901008 7 ANY HOLES? 
ia 011340 001406 = ge0 a CONF IGCRO) :SET ERROR BIT IN nee TGURATION TABLE 
 O118 2 UD 4. 9 BIS  _ CPUBIT. CONFIGCRO) ;SET ACCESSED BIT 
6217 011356 760 02106 : MP TAG9$ 
18 011364 000137 010776 
: TEST A PROTECTED BANK 
20 TSTBANK : Ri MOY RL. (SP) 
: 011870 010146 MOV #1, NONEM :SET NON-EXISTANT MEMORY TO COUN 
22 011372 012737 000001 002100 mov sr inst Ro 
33 Ol iaoa 012701 020000 MOV 20000, 





CVMJABO MSV11-J MEMORY DIAG 
T BANKS 1-200 


3 TES 
104424 
053737 


: pa TE 44 
ghisse fclits 
HE rss 
005737 
giiate Seaiet 


012737 


ooo 
~ 
ero 


fe pet ta a ee et pede a 
Pee fe path Det pelt pee pao er Bt 


Sete 


002552 


000002 


002072 
000001 
177777 


002070 
002106 


010776 


002074 


MACRO YOS.02 


(OCTAL) FOR ZEROS E 


177776 


MTSTS: 


2s: 


Monday 07-Oct-85 16:57 
ONES 





CACHOF F 
TESTAREA 





TESTMODE , PSW 


CRO) 
R1,4$ 


BIS 
TST 
S08 


KERNEL 
CACHON 
MOV 
POP 
IF PARCNT NE @0 


#2 .,NONEM 
Ri 


BIS #@BITO,CONFIG(R1) 
SET CONFGERROR 


END ;OF IF PARCNT 
IF NEMCNT EQ #0 





BIS CPUBIT,CONFIG(R1) 
END ;OF IF NEMCNT 
JMP TAG9$ 
MOV R2,(RO)+ 
Ss R1i.MTSTS 
C(R4)¢,R1 
R1,R2 
33 
PATERR 
R3, 


Page 145-2 


a reeeeesteeatiiicantintiadtiametie tiie iim 


SEQ 0141 
URN CACHE OFF 


37 
sENTER TEST MODE 
:GO0 TO SYSTEM TEST MODE 


sENTER KERNEL MODE 

; TURN CACHE ON 

;RESET NON-EXISTANT MEMORY TO EXIT TEST LOOP 
MOV (SP)+,R1 


TST PARCNT 
BEG LSS 


_—_ —- 


;ERROR BANK 
MOV #@-1,CONFGERROR 
LSSsssssss 


TST NEMCNT 
BNE LS56 
;ACCESSED BANK 
LS6:sssssa 
sWRITE MEMORY TO PATTERN 


300 TILL 
‘THIS IS EITHER A NOP OR RETURN 
‘DOES IT MATCH ? 


SIF NOT COUNT ERRORS 
sANY WAY DO ALL MEMORY 
;DONE... .RETURN 


Le ee 


C 
T 
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6251 011526 SUBAAI: SUBTST <<FIND SHADOW INHIBIT MODE POINTERS>> 
§ SSSSSSSESSEESESSSSESSESEESESEASSSSSESSESEESSSSESSESESSEEESEEEESE SEEDED EEEEEEEEES 
1 *SUBTEST FIND SHADOW INHIBIT POINTERS 


SEQ 0142 












§ SSSSSSSSSSESESSSSSSSSSEAESSSEEEEES £66666 666686066664646666666 6646666666666 66666606 
;@ THIS SECTION LOOKS FOR INTERLEAVED MSV11-J IES AND FI 
;@ WHERE THE SHADOW INHIBIT MODE POINTERS ARE LOCATED. THESE AREAS 
:@ ARE THEN MARKED AM SPACE. 
911 905087 102 CLR BANK ;RESET BANK TO ZERO 
O11 004737 os? 60 SHADL1: CALL § EXBANK ;SET BANK PARAMETERS 
o1 013700 002104 BANKINDEX, RO 
IF ACFLAG IS TRUE AND INTFLAG IS TRUE 
9 005737 002116 TST ACFLAG 
i 00 414 BEQ LS/ 
0 : 0087 7 002136 TST INTFLAG 
0 00141 BEQ .57 
702 000040 ADD #40,R2 ;POINT TO BANKINDEX + 8 
737 000020 002102 ADD #20.B6ANK ;POINT TO BANK Saden 
7 760 000200 002664 mS 8117, CONFIGC(RO) ;MAKE NEW BANK AM SPACE 
$ 76 ©c00402 BR L60 
4 LS7ssssases 
6263 005237 002102 INC BANK ;GO TO NEXT BANK 
011604 END; OF IF ACFLAG 
teres L6O:ssssas 
6265 011604 023737 002556 02102 cHe LASTBANK , BANK |HAVE WE DONE ALL THE BANKS? 
011612 002347 BGE SHADL1 ;BRANCH IF NOT 


Co 
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IT MODE POINTERS - 


6269 011614 





011614 000004 
70 





177777 
002102 


Her 
002152 
002152 
002122 
000100 


012036 


002156 


§ SOSESSESEESSSEEEESESSESESESEOESESSESSOSSSESOEESESSSSSESEEESSSESESESESESEEEDEHDEEOE 
INHIBIT MODE POINTER T 


NEWTST 


s*TEST 4 


ist 


Ecc IT 
yo = + OR RR 0668680606 664666666664666666 


“CONTROLLED BY AC ae 


GIVEN SYSTen CONFIGURATION WHI 


ST4: 


SCOPE 
sTHE MSVii- Re ies INHIBIT “ tS oe ge 


ON THE BOTT T OR SECOND 
: 10 Be R PROTECTED. aux 






sQUITE COMPLEX T 
iBANKS CAN BE PROTECTED: 


i THIS ROUTINE ATTEMPS TO CREATE A DOUBLE BIT ERROR IN ADDRESS O E 2 
ECC HAROWARE HAPPENING 


s0F EVERY 


MOV 
FOR BANK := #0 TO LASTBANK 


MOV 
CALL 
MOV 





<<ECC INHIBIT MODE POINTER TEST>> 









ECC BANK. 






THIS ROUTINE. 


THIS oUt ane BUT NOT PAST IT! 


#-1,0LOCSR 





@FIRST ,R1 
EXBANK 


BANKINDEX RO 
IF ACFLAG IS TRUE 


IF MKFLAG IS TRUE 


IF SKIPMK IS FALSE 


ASL 
BIC @tC36,R2 
TP CSRNO re ne Com 






62.R3 
er ene ecne 2 8 


MOV CSRNO, OLDCSR 
IF PFLAG IS FALSE 


BIS #@6IT6,COMFIG(RO) 
END; OF IF PFLAG 


CALL IMPTEST 
CSRNO 


END; OF IF 


WILL PREVENT THIS 
sIN PROTECTED BANKS WHICH SHOULD ALWAYS INCLUDE BANK ZERO - WHERE 
THE PROGRAM IS. 


FAILURE IT IS COMMON mim A <- 
THE KERNEL ST 
YOUR ONLY CLUE IS THAT OU “CAN GET AS F 
; TURN CACHE OFF 












BIT ERROR 
ow as 






CLR BANK 
(SET UP VERT ADDR POINTER 


TST ACFLAG 
BEG 1.61 


TST MKFLAG 
BEQ@ L62 


TST SKIPMK 


L635 
sSET INDEX COUNTER 


CMP CSRNO,OLOCSR 


BEQ 164 


TST PFLAG 
ONE L65 


L6S:sssass 


LG64:ssasas 


a 


SEQ 0143 
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POINTER TEST SEQ 0144 
6308 011750 END; OF IF SKIPMK 
O11 LOS:sasaae 
6309 O11 END; OF IF MKFLAG 
011 LG62:iaaaee 
6310 O14 END; OF IF ACFLAG 
0117 : L6lisssass 
6311 O11 END; OF FOR BANK 
O11 905237 002102 INC BANK 
O11 023737 002102 002556 CMP BANK,LASTBANK 
oti Tea 003723 a BLE 86 
3 state 
6312 o117 MAP :MAP TEST SPACE TO BANK 'O 
011764 010 MOV R3,-(SP) 
011766 0 708 000200 MOV 200 ,R3 
011772 737 035604 CALL MAPPER 
.DSABL CRF 
011776 0 3 MOV (SP)+,R3 
6313 0 37 002102 CLR BANK 
6314 0 IF @SWO SET.IN @SWR OR ACTFLAG IS TRUE 
01 €32777 000001 170624 BIT @SwO,@SWR 
01 001003 BNE 
012014 737 002350 TST ACTFLAG 
01 001402 BEQ L67 
0 L66:sssaae 
6315 012022 104506 ENASBE ;TRAP ON SINGLE BIT ERRORS 
6316 O1 ELSE 
01 000401 BR L70 
01 L67:ssacee 
6317 0 104472 ECCINIT ;TRAP ON DOUBLE BIT ERRORS (NORMAL ) 
6318 0 END; OF IF @Swo 
01 L7O:sssise 
6319 912030 104423 CACHON ;TURN THE CACHE BACK ON 
6320 012032 000137 012260 JMP SUBAAR ;JUMP OVER THE SUBROUTINE 


eee ae ee ew ela ee eee eee ee ee 


suse MSVi1-J MEMORY 
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DIAG. 
ECC INHIBIT MODE POINTER TEST 


6322 012036 

6323 012040 
012040 
012042 
012046 
01 

6324 0 

oe 
site 

6327 01207 
01207 

6 012074 

6 012076 
012076 

6 012100 

6 012102 

6 012104 

6 012106 

6 012110 

6335 0121 

6 012114 

6 

6 

6 

6 012116 
012116 

6 0121 

6 .e) 

6 0121 

6 0121 

6345 0121 

6 012140 

6 0121 
0121 

6 0121 
012146 
St 4 

6 0121 
0121 
012162 
0121 

6355 . : 

6 01 70 

6 012172 

6 0 

: 01 

$i § 

6 01221 

6 


é 


012212 


005004 
010346 
013705 
004737 
suas 
012737 
053737 


102 
03 


020000 002150 


002552 


002614 


023140 


023604 


177776 


IMPTEST:CLR 
MAP 


CHK10IS 
MOV 








(R1) 
R3.R1 
(Ri) 
R4,(R1) 
R4,(R1) 
(R1) 


TESTMODE ,PSW 
CRF 


@B1T13.CSR 


CBRE 
MOV #235140,CSR 


MOV R4,(R1) 
RiCSR 

TST (Ri) 

WA 


S1D0BE 
ON.NOERROR ;3 





CHKiDIS 
Vv 


MO 
CLRIC 
TST 
Wa 


END ;OF ON.NOERROR ;5 
END ;OF ON.NOERROR ;2 


CBREG 
MOV #235604 ,CSR 


R4,CR1) 
C(R1) 


; INDEX TO NEXT LOCATION 
;SAVE TEST LOCATION 


MOV (CR 
;DISABLE ECC € WRITE CHECKBITS ‘Por i 


SEQ 0145 


;MAP SUPERVISOR SPACE (TEST AREA) TO BANK 
MOV RS ) 


;ENTER TEST 


MOV (SP)+,.RS3 


MODE 
:GO TO SYSTEM TEST MODE 


;SAVE TEST LOCATION 


;WRITE CHECKBITS (ALL ZEROS) 


;CLEAR 


;WAS THERE A DOUBLE 
;THIS MAKES SURE THAT SBE‘S DON'T LOOK LIKE PROTECTED AREAS 
ON.NOERROR ;1 


BCS L71 


i), 


-( SP) 
CSR 


CSR 
READ Tg Sh INTO REAL CSR 
BIT ERROR 


sDISABLE ECC € WRITE CHECKBITS FOR 1 CSR 


;CLEAR CSR 


sWAS THERE A DOUBLE BIT ERROR 


72 


BCS L 
sENABLE CHECK/SYNDOROME BIT REGISTER 


;WRITE 


DBE'S 
: DISABLE ECC € WRITE CHECKBITS FOR 1 CSR 


;CLEAR CSR 
;WAS THERE A DOUBLE BIT ERROR 


ecs L735 
ree CHECK/SYNOROME BIT REGIS:ER 


WRITE DBE'S I 
; DISABLE ECC € WRITE CHECKBITS FOR 1 CSR 


;CLEAR CSR 
;WAS THERE A DOUBLE BIT ERROR 


L7Ssssssas 
L72:sssses 
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j 
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eee 1 SlIBIT MODE POINTER TEST — 









NAAT AN EANEN ONENESS ES 
ay 44 44 44 | 


END ;OF ON.NOERROR ;1 





ON. ERROR 
10300 
INC RS 
END :OF ON.ERROR 
104471 e€ccioIs 
010411 MOV R4,(R1) 
060301 R1 
01041 R4,(R1) 
104 
005 RS 
po $s i$ 
002664 RS. CONF IGC(RO) 
1 002666 CONF IG+2(RO) 
1 36 
1%: CR1) 
0 il 
160301 R3,R1 
CR1) 
01261 
10441 
000207 
STOPOK 





012737 177777 002420 


L7Assassas 


BCC L74 
; IDENTIFY AS BAD BANK 


L74@:333 
;DISABLE ERROR CORRECTION 
;CLEAR OUT DOUBLE BIT ERROR: 
‘INDEX TO SECOND 
‘CLEAR OUT DOUBLE BIT ERROR: 





sRESTORE TEST LOCATION (2ND 
MOV 


WORD ) 
(SP)-,CR1) 
;GO BACK TO FIRST WORD 
sRESTORE TEST LOCATION (1ST WORD) 
MOV (SP)+,(R1) 


;PROGRAM CAN NOW BE HALTED 
MOV #@-1,STOPOK 


SEQ 0146 


14 


MSV11-J MEMORY DIAG. 


mm TT mm eee; 


ECC INHIBIT MODE POINTER TEST 


6386 012266 


ser arc 


3 


AHR 
o 


25 


= i oe oe 


—- 
o w 
oo 

eee ee 
222 
fororn 


3 


% Pat 


pores 
me OD 
oS 


eet ee 

Pu 
~ 
/ 


°o 
ae eer roro mens ee 
basse 
~ 


$2 3tt fF 


6421 tg rt ri 


000403 


012737 


177777 002450 


SUBTST 
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<<LEGAL CONFIGURATION CHECK>> 


SEQ 0147 


§ SSSSSSSSSSSSSSSSESSESSSSSSSSSSSSSSSSSSHSSSSHSSSSHSSHSSHASSSSHSSSEHSESESHHEHSESOHSESESEKE 


LEGAL CONFIGURATION CHECK 


§ SSSSSSSSSSSSSESSSSSSSSSSSSSSSSSSSSSSSSSSSSSESHSSSSSSSSSSESSSSHESHESSEHSESHSESEHSHSHS 


3 SUBTEST 
#16. ,RO 
MOV @CSRINFO,R1 
1s: CLR (Ri) 
S08 is 


CALL EXBANK 
MOV BANKINDEX ,RO 
IF ACFLAG IS TRUE 


MOVB 
BIC Ci7 
ASL R 


CONF IG+1¢€RO),.RS 
or RS 


CSRINFOCR3) 


INC 
IF MKFLAG IS TRUE 


CLR BANK 


B7isssaas 


TST ACFLAG 
BEQ@ L75 


TST MKFLAG 
BEQ L76 


;MAKE SURE THAT EACH BANK HAS NO MORE THAN 2 CSRS 


BEGIN LEGALCSR 
IF INTFLAG IS 


MOV R3,R4 
BIC #tCi7,R3 
ASH @-41,R4 
BIC #@tCi7,R4 
IF RS EQ R4 


BIC 


BIC #17 
LEAVE LEGALCSR 


END; OF IF R 
ELSE 


LEAVE 
END; OF IF INT 


TRUE 


CONF IG+1(RO),RS 


BlO:sssses 
TST INTFLAG 
BEQ@ L77 


CMP R3,R4 
BNE L100 


#B1T11!:B6I1T12,CONFIG+2(RO) 
ONF ZGCRO) 


3 


LEGALCSR 
FLAG 


SET CONF GERROR 


END LEGALCSR 
END ;OF IF MKFLAG 





BR E10 
LiIOO:ssssas 


BR L101 
L77:ssssa3 


BR E10 
LIOL:ssssss 

MOV @-1,CONFGERROR 
ElO:ssssss 
L76:ssss53 
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LEGAL CONFIGURATION CHECK SEQ 0148 
6422 012434 END ;OF IF ACFLAG 
434 L7S:sseaee 
6423 012434 END; OF FOR BANK 
012434 005237 902102 INC BANK 
012440 023737 002102 002556 CHE BANK. LASTBANK 
012446 003717 BLE 87 
01 S36 aE $333 
6424 0124 PUSH _—RS.RO VSAVE CONTENTS or RS, RO 
012450 010546 RS. -(SP) 
012452 010046 HOV RO. -(SP) 
6425 012454 005000 CLR RO ;CLEAR REGISTERS 
6426 012456 00500 CLR R1 
6427 O1 CLR RS | 
6428 O1 005037 012670 CLR MBERR ;CLEAR ERROR INDICATOR 
64 0 466 761 000177 002462 2%: ce @177,CSRINFOCR1) Is CURRENT CSR <= 177 | 
3 ' 
6431 012476 022761 000010 002462 CMP 810, CSRINFOCR1) ;IS CURRENT CSR < 10 
6432 0 002003 BGE :BR F 
6433 O1 004737 013012 CALL ILLCSR ;CALL ERROR ROUTINE 
6434 012512 C00434 BR j ;TRY NEXT CSR 
6435 012514 016005 002664 3s: MOV CONFIGCRO),RS ;MOVE LOW WORD TO RS 
6436 0 000002 BIT 6B1T1.R5 ‘DOES MEMORY EXIST HERE? 
6437 012524 001415 BEQ 4$ ;BRANCH IF 
6438 01 042705 170377 BIC @tC7400.RS ;ISOLATE CSR NUMBER IN | 
6439 O1 072527 177771 ASH 0-7,R5 ;REGISTER 5 
6440 O1 i CMP R5S,R1 ;IS IT THE CURRENT CSR? 
6441 01 100 BNE 43 ;TRY NEXT WORD OF CONFIG IF NOT 
6442 012542 032760 010000 002666 BIT @B1T12, CONFIG+2(RO) :IS IT INTERLEAVED? 
6443 01 30 001003 BNE 4$ ;BRANCH IF SO 
6444 O1 012737 000001 012670 MOV 01. MBERR SET ERROR INDICATOR 
6445 01 062700 4$: ADD @4-RO ;UPDATE CONFIG COUNTER 
6446 0 022700 000340 CMP 0340,RO ; CONFIG TABLE ALL DONE? 
6447 012570 001351 BNE 33 ;BRANCH I 
6448 012572 00373 012670 TST MBERR ERRORS Foss 
6449 012576 001402 BEQ S$ :TRY NEXT CSR IF NOT 
64 013600 004737 013012 CALL ILLCSR ;CALL ERROR ROUTINE 
6451 012604 005000 S$: CLR RO ;REINITIALIZE CONFIG COUNTER 
6452 012606 005037 012670 CLR MBERR ;CLEAR ERROR INDICATOR 
6453 012612 062701 000002 ADD @2,R1 ;UPDATE CSR COUNT 
6454 012616 022701 000040 CMP : ;ALL CSR’ 
6455 012622 001321 BNE ;BRANCH IF NOT | 
6456 012624 Pop RO,.RS ;RESTORE REGISTERS 
012624 012600 MOV (SP)+,RO 
01 012605 MOV (SP)+.R5 
6457 012630 005037 012670 CLR MBERR ;RESET ERROR INDICATOR 
6458 012634 012700 000774 MOV $774,RO ;INDEX 70 TOP OF CONFIG TABLE ;R-C 
6459 012640 032760 000002 002664 63: BIT #B1T1, CONFIGCRO) ;MEMORY PRESENT? 7R-C 
6460 012646 001003 BNE 7$ ;BRANCH IF SO R-C 
6461 012650 162700 0v0004 SUB 04,R0 TRY NEXT LOWER ENTRY IN CONFIG TABLE ;R-C 
6462 012654 000771 BR 6$ :R-C 
0126 7$: ASR RO *R-C 
6464 012660 006200 ASR RO ;DIVIDE INDEX BY 4 TO GET BANK @;R-C 
6465 012662 010037 002556 MOV RO, LASTBANK ;STORE IN LASTBANK :R-C 
6466 012666 000402 BR SKUJ 
6467 012670 000000 MBERR: .WORD 0 ;SAVE SPACE FOR ERROR INDICATOR 
6468 012672 000000 PHEBE: _WORD O ;SAVE SPACE FOR ODD BOUNDARY INTERLEAVED INDICATOR 
6469 012674 005000 SKUJ: CLR RO ;CLEAR CONFIG COUNTER 
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LEGAL CONFIGURATION CHECK 


gress 
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ooco 
RRL 
SERN 


Rha 
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ocooooooooc“swoooooo 
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eg 
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0000 
06270 
06270 
110237 
104401 
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012672 
000002 
010000 
012672 
000004 
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602664 
002666 


002450 


1%: 


2s: 


3$: 
4$: 
5$: 
ILLCSR: 


1$: 


PHEBE ;CLEAR COUNTER 
©8111, CONFIG(RO) ;I1S THERE MEMORY PRESENT? 
;BRANCH IF 
@B1T12, CONFIG+2(RO) :1S IT INTERLEAVED? 
PHEBE INCREMENT COUNTER 
@4,RO NCREMENT CONFIG COUNTER 
i$ :TRY NEXT BANK 
PHEBE , #10 ;IS THE COUNTER EQUAL TO... 
ry ;ONE OF THE SPECIAL VALUES. 
PHEBE , #30 sIF IT IS... 
4 ;BRANCH TO 4$ 
PHEBE , 250 
PHEBE . 070 
PHEBE ;CLEAR INDICATOR 
#1, PHEBE SET INDICATOR 
UBAAP ;BRANCH TO NEXT SUBTEST 
R1,R2 ;R2 HAS CSR NUMBER 
2 ;MAKE ACCEPTABLE FOR PRINTING 
is *e R2 
07 .R2 
Re .MSGA122 ;PUT NUMBER INTO ERROR MESSAGE 
.MSG122 
CONFGERROR 


SEQ 0149 


#-1,CONFGERROR 


-— ——— ee ee 


— ee ee ee 


CVMJABO MSVi1-J 
LEGAL CONFIGURATION CHECK 


6502 013054 


6503 013054 
3054 


wu 
me pat be pet mee 
fae ps hee 
cs Qs 


S SeFSSs 


= 
0 


cococooceoecooceoecoo oo 
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WR 


SONANARSS 


AAAAAGH 
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ced 
be 
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033761 
001411 
one7sh 
00140 

005237 
000402 


005237 


005001 


033761 
001402 


002400 
002402 
002556 


002400 


002374 
002374 


000002 
000010 


002106 


ee ee eee” 
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002452 


002664 


SEQ 0150 


SUBAAP: SUBTST <<PRINT CONFIGURATION DETAILS>> 


§ SSSESASSSSSSESEKE SESHHSHEAESSEASASESSHASESESSSSSSSSASSHSSHKSSHSHEESSESSHESSEHEOSEEEEHESD 


: SUBTEST INT CONFIGURATION DETAILS 
| SCERSRERSSSESRESESSEAASSEEEERESAEESSSESEAESASAESAESASAHEEHAKEREREAEASEEKEDEROEEESES 
CLEAR ZE .MSIZE 
CLR LSIZE 
CLR MSIZE 
MOV LASTBANK ,R2 
ASL R2 
ASL R2 
FOR R1 := #0 TO R2 BY 04 
CLR Ri 
Blisssssss 


IF CPUBIT SET.IN CONFIGCR1) 
BIT CPUBIT,CONFIGCR1) 
BEQ L102 


IF @BITS SET.IN CONFIG+2(R1) 
BIT BITS, CONFIG+2(R1) 
BEQ@ L103 


LET MSIZE := MSIZE + #1 
INC MSIZE 
ELSE 
BR L104 
LiOS:sisass 
LET LSIZE := LSIZE + #1 
INC LSIZE 
END; IF BITS 
L1IO04:isisis 


END; OF IF CPUBIT 
END ;OF FOR ALL BANKS IN TABLE 


LiIO2:ssssss 


#4,.R1 
CMP R1,R2 
BLE B11 
Ell:ssssses 
CLR 
FOR R1 := #0 TO #10 BY #¢2 
CLR R1 
Bl2:ssssas 
ASL BSIZECR1) 
ASL BSIZECRi) 
ASL BSIZECR1i) 
ASL BSIZECR1) . ore re := BSIZECRI) * 16. 
ADD BSIZECR1).I :I <- I + BSIZECR1) 
END; FOR R1 
ADD #2,Ri 
CMP R1,010 
BLE Bi2 
El2:ssssses 
FOR R1 := #0 TO #200 BY @4 
CLR Ri 
Bid:ssssss 


IF CPUBIT SET.IN CONFIGC(R1) 
BIT CPUBIT,CONFIGCR1) 
BE@ L105 


LET UNITOP := UNITOP + #1 


a 


LL 


VMJABO MSV11i-J 


6526 015224 
otaas 
6529 01 
0132 
013356 
01 
01 


AAMAMA 
HOSaae 


oo coooocoooeo oo cocoececco © 


6542 015 
3 
st 
$3 3h 
oH Suite 
bis 
3366 
6549 013370 
3370 


— ee -—— <= 


005237 


023737 


CvMJ Y OIAG. 
PRINT CONFIGURATION DETAILS 


002416 


002400 


071075 
002402 
004000 
000004 
002402 


071127 
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002416 
002452 


002400 
002400 


002402 
002402 


2s: 


12$: 


3$: 


13%: 


END; OF IF CPUBIT 
END; OF FOR Ri 


ASL oP 
IF I LT UNITOP THEN LET I 


TYPE $CRLF 
» $CRLF 


TST LSIZE 

22048. ,LSIZE 
64 ,LSIZE 
LSIZE,-(SP) 


MSG112 
MSGi12 

TST MSIZE 

22048. ,MSIZE 
43 * SIZE 
MSIZE,-(SP) 


CRF 
MSG113 
».MSG113 
CRF 


INC UNITOP 
LiIOS:sssaas 


ElLS:sssasass 
ein * 16. 
CMP I,UNITOP 


MOV UNITOP ,I 
LiIOG:iisass 


; SUBTRACT 4K FOR THE I/0 PAGE 


;sSAVE LSIZE FOR TYPEOUT 
3:GO TYPE--DECIMAL ASCII WITH SIGN 


; SUBTRACT 4K FOR THE I/0 PAGE 


;;SAVE MSIZE FOR TYPEOUT 
;;GO TYPE--DECIMAL ASCII WITH SIGN 


—- ee — 
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PRINT CONFIGURATION DETAILS SEQ 0152 
65 013374 022737 9004000 002452 5%: CMP @2048..I 
6551 01 001003 BNE 6$ 
65 01 162737 000004 002452 suB 4.1 ; SUBTRACT 4K FOR THE I/0 PAGE 
655 te rte: 6%: TYPDEC I 
0 013746 002452 MOV I,-C(SP) ;;SAVE I FOR TYPEOUT 
013416 104405 TYPOS 3:GO0 TYPE--DECIMAL ASCII WITH SIGN 
.DSABL CRF 
6554 ou see TYPE MSGO70 
0134 104401 070177 TYPEIT .MSGO70 
.DSABL CRF 
6555 013424 IF @SW6 OFF.IN @SWR 
032777 000100 167204 BIT @SW6.8SWR 
0 7. 001902 BNE L107 
6a38 01 004737 032610 CALL PCONFIG 
6 013440 END; OF IF #SW6 
013440 LIO7:sssaas 
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PRINT CONFIGURATION DETAILS. ™ SEQ 0153 
6597 013440 LOOP: NEWTST <<DIAGNOSTIC MODE DISPATCH ROUTINE>> 
§ SSSSSSSSSSESSSSASSSSSSSSSSSESSSSSSSTSSSSSSSHSESSSSSHSSSESSESSESSSEASHSSSSHSSSSESESSEESES 
;eTEST S TIC MODE DISPATCH ROUTINE 
SSSSSSSSESASSSSSESESSSSASSSSSESSASSSKSSSEASSHSEESSAS 6066668 6066666666666606446466660086 
013440 1STS: SCOPE 
6598 013442 37 002222 CONTFLAG 
65 013446 017700 167164 MOV GSUR RO :GET SWITCHES 
6600 O01 32 042700 177761 BIC @tC16,RO ;MASK TO ONLY MODE BITS 
6601 O1 004770 013466 CALL § @OISPTBLCRO) ‘DISPATCH TO ROUTINE THROUGH NEXT TABLE 
01 000137 013506 JMP ME MD ONE obser? O NEXT TEST 
01 0141 DISPTBL:BAFPAF ;MODE O;BANKS F TTERNS FORWARD 
6604 013470 014 BAFPAR ;MODE 1; S FORWARD. PATTERNS REVERSE 
6605 0 7 014 BAWPAF .MODE 2;BANKS WORST FIRST, PATTERNS FORWARD 
6606 013474 014514 BAWPAR jMODE 3,BANKS WORST FIRST. PATTERNS REVERSE 
6607 013476 014644 PAFBAF ;MODE 4;PATTERNS FORWARD, BANKS FORWARD 
o4 014774 PAFBAW ;MODE 5S;PATTE . BANKS WORST FIRST 
0 015146 PARBAF ;MODE 6;PATTERNS REVERSE. BANK 
6610 01 015276 PARBAW ;MODE 7;PATTERNS REVERSE. BANKS WORST FIRST 
661 013506 C04737 014050 MEMDONE:CALL §§ DOBACK ;CHECK BACKGROUND PATTERN 
6614 013512 NEWTST<<UNIQUE BANK TEST>> 
f SSSSSSSSSSSSASKSSSSSSSSSASESESESSESSESSESSESSSSESSESESSSESSESSESSESSEESESHEEEEEEEESESEEEEEE 
;#TEST 6 UNIQUE BANK TEST 
eS ee ee ee ee. 
013512 000004 1ST6 
6615 SAKE SURE THAT EACH BANK CAN HAVE UNIQUE DAT 
6616 ;WRITE AND READ THE BANK NUMSER IN EACH BANK CEXCEPT WHERE THE PROGRAM IS) 
6617 013514 IF SELONLY IS FALSE 
O13 4 005737 002002 TST SELONLY 
01 001015 BNE L110 
6618 O13 2 SET HEADER, MUT 
0 012737 177777 002612 MOV #-1, HEADER 
013 012737 177777 002110 MOV @-1.MUT 
6619 O01 004737 021476 CALL MT0027 
— o1 SET HEADER 
012737 177777 002612 MOV @-1,HEADER 
005037 002110 CLR MUT 
END ;OF IF SELONLY 
ste LiLOssssiss 
6623 oi 004737 014050 CALL §OOBACK ;RESTORE BACKROUND PATTERN 
H 013560 FLUSH: SUBTST <<FLUSH OUT DBE’S>> 
eee 
3% 
3 £2246642866646066466644624464664640446664664646046464664466466046464640646664646646466646646646664646664666666466 
6629 013560 004737 022066 c 0030 


—_— ———— 


g EEESSeeeeetorsrss 


sce oooo 


ocooo 
er 
333d 3344 





CVMJABO MSV11-J 
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002016 
056 724 


- SBT END OF PASS ROUTINE 

| POSSESSES SESEEEESSESESEESEESEESEESESESEEDESEEEEDESEEESEESESEEESEEEEESEDEEES 

s*INCREMENT THE PASS NUMBER ( $PASS) 
; s INDICATE END-OF -PROGRAM AFTER EACH PASSES THRU THE PROGRAM 
s@TYPE “END anes @XXXXX" CWHERE XXXXX IS A DECIMAL NUMBER) 
3;*IF THERES A MONITOR - To IT 
ox THERE ISN'T JUMP TO L 
sEOP: FSINFL 








CLR 

MOV eCONFIG+2,RO sMOVE 2ND WORD OF CONFIG TO RO 
1%: BIC #61T13,CRO) ;CLEAR oy VALIO BIT 

ADO 04, s INCREMENT TO NEXT BANK 

CMP RO, #3620 3; DONE ? 

BLE 1% :NO - BRANCH 

MOV sERTTL ,.LASTERROR 

INC ;; INCREMENT THE PASS NUMBER 

BIC #100000, $PASS : DON’ T ALLOW A NEG. NUMBER 

TYPE MSGO77 ;;TYPE “END PASS @” 

TYPEIT ,MSGO77 


.OS 
IF @SW1il SET.IN @SWR OR QVFLAG IS TRUE OR $PASS EQ 41 
BIT #SW11,8SwR 


Lill: 
35 seeess 
MSGOS35 


;QV 


QVFLAG 
IF SWii 
Lil2:ssssss 


::;SAVE $PASS FOR TYPEOUT 


$PASS 
$PASS, -( SP) 
33GO TYPE--DECIMAL ASCII WITH SIGN 





CRF 
42,R0 3:GET MONITOR ADDRESS 
BE sDOAGAIN v ARE WE IF NC MONITOR 
$ZAP42: pe RO WE UNDER RT1i1 
BE BRANCH 
UNDER (HEAVEN Help US) XXDP ! 
MOV RO, -(€SP) 
SHUTUP 
RO 
MOV C(SP)+.RO 
RESET ;;CLEAR THE WORLD 
SENDAD: CALL CRO) ::G0 TO MONITOR 
NOP 3;SAVE ROOM 
NOP 3 3FOR 
NOP 3sACTil 
$DOAGN: ;UNDO SHUTUP STUFF 






RESTORE STACK 
ENERGIZE Q-BUS MAP € 22 BIT ADDRESSING 
ZE MEMORY MANAGEMENT 


ENERGI 
PUT LOADERS BACK HOME 


SEQ 0154 


LL LL LLL LLL LLL LLL LLL 


cee Hy ote -J =v OIAG. 
PAS 


013706 






r) 
6680 01! 
O 005737 
“os 31408 
Sisore 961014 
: 014 
8 ea 
7 7 
014034 077107 
014 ; 
42 000764 
i 3 
6690 014084 
6691 014044 000137 


013440 
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MOV KSTACK, SP 
TST Noz28 IT ;IS THIS AN 11/83,11/23-8 OR 11/237 
172516 gIs 88ITS!B1T4, MARS 
$: ; TURN ON MEMORY MANAGEMENT 
;DESTINATION BANK 
MOV ;SOURCE BANK 
Cc ANKMOV 
IF APTFLAG IS TRUE 
TST APTFLAG 
BE@ L113 
IF suSWR EQ $PASS 
056724 CMP SUSUR, SPASS 
BNE L114 
AP THANG : Hoy #50,R1 
2s: S0B RO.2$ 
056726 ADO #1, SDEVCT 
adc ¢ SUNIT 
INC $ SPAS 
BR APTHANG 
END ;OF IF sUSWR 
LiL4:ssisss 
END ;OF IF APTFLAG 
LAL:ssssss 
$DOAGAIN: JMP LOOP ; RETURN 


SE@ 0155 


eee ee 


— 
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| 6694 014050 
6695 0 
i is 
$635 Oisoss 

01406 
O14 
6699 r + 
: 
$703 24 
6703 01413; 
6704 01413: 
& 
4146 
6705 4146 


Hi 
S88 


177777 


i777 


002102 
002102 


DOBACK: SUBTST <<WRITE PATTERNS >> 

§ COSSSESSEESSSESESESESSESESSESESSESOSSSEESSHESSSSESSSSSSESSSEESEHEEHESEESSEOSOOOOEE 
s *SUBTEST WR PATTERNS 

| SESSSSSSSSEEEEESEESSESEEEEEESEESSEESSEEEEESESESEDESEESEEEOSEEEESESEEEEESEESEEEODS 


PATTERN 
FOR BANK := #0 TO LASTBANK 
CLR BANK 
BiS:ssssias 
CALL EXBANK 
IF ACFLAG IS TRUE AND RRFLAG IS FALSE 





SET HEADER . MUT 
CALL MKTEST ;CALL MJTEST WOULD ALSO WORK 
CLR MUT 
SET HEADER 
MOV @-1,HEADER 
END ;OF IF ACFLAG 
LiUS:ssssss 


END ;OF FOR BANK 


INC BANK 
CHP BANK ,LASTBANK 
_ BLE 614 
RET TeSS8ea5 


SEQ 0156 


6708 
6709 
6710 014150 


2 014204 
014210 


33 014212 
014216 
014222 


CVMJABO MSV11-.) MEMORY 
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002126 


036310 


014150 
037122 
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_ SE@ 0157 


.SBTTL MTEST MODES 


BAFPAF: SUBTST <<BANKS FORWARD,PATTERNS FORWARD *@RECURSIVEss>> 
sSgnsasneceasecocasacscnscosasasocsscesesscsaescesasssncssssonsesasacccaccesess 


;*SUBTEST BANKS FORWARD ,PATTERNS F *eRECURSIVEss 
ee MS a x » < eeneneeeseen 


;SET BANK T 


1%: CALL EXBANK sEXAMINE SANK 
TST ACFLAG ;CAN WE ACCESS THIS BANK? 
SEQ as sNO - GO TO BANK LOOP TERMINATION 
TST RRFLAG ; RELOCATION scan 
BNE ;YES - GO TO BANK LOOP TERMINATION 
CL T iSET PATTERN TO 0 


R PATTERN 
START OF PATTERN LOOP 


2s: ALL :GO TEST CORRECT MEMORY 
Lee oat OF PATTERN LOOP 
AL INCPA ;GO SEE IF THIS IS THE LAST PATTERN 
BNE 2s ;NO - LOOP ON THIS PATTERN 
pene OF BANK Loop 
4$: CONTFLAG 
ot ;NEXT HIGHER BANK 
i$ ;IF NOT DONE - LOOP ON THIS BANK 
i OF LOOPS 
uct sHAVE som RELOCATED? 
3 
OE URN :YES” - RETURN 
5$: CALL ‘MOVE E MAP PROGRAM 


RELOCATE 
ON.ERROR THEN SRETURN 
BCC L116 
RTS PC 
LI16:sssiis 
;*#@NOTE*¢e RECURSIVE CALL 
CALL BAF PAF 
ALL UNRELOCATE 
RETURN 


;CALL SELF 
;UNMOVE & UNMAP PROGRAM 


TTT TS _e_—_— ee 


- ee ee eee ew 


A LL TT EEE TT 
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YOS .02 
= oRECURSIVE® ee 
BAFPAR: SUBTST <<BANKS FORWARD,.PATTERNS REVERSE eeRECURSIVEse>> 


§ SSSSHSSSSESSSSSSESSSSSSSSSSSSSSHSSSSSESSSSSSSSSSSSSSSHSSSSSESSSSSSSHHSSEEEEOHEES 


CVMJABO MSV11-/ MEMORY DIAG. 
BANKS FORWARD ,.PATTERNS FORWARD 


6740 014256 


SEQ 0156 










; eSUBTEST BANKS FORWARD.PATTERNS RE eeRECURSIVE se 
F SSSSESSSSSSSESSSSSASSSSHSSSSSSESSSSSSSHSSHESSESASESESSESSESSESSEESSSSSSSEESESESESESEEESD 
6741 014256 005037 002102 :SET TO 0 
1 START OF BANK LOOP 
6743 014262 004737 037760 1s: ALL EXBANK ;EXAMINE BANK 
6744 014266 005737 002116 TST ACFLAG iCAN WE ACCESS THIS BANK? 
6745 014272 001412 BEG as ‘NO - GO TO BANK LOOP TERMINATION 
Orta o1as7a OO8787 002124 TST RRFLAG ;RELOCATION REQUIRED? 
6747 014 001007 BNE as rYES - GO T LOOP TERMINATION 
6748 014302 004737 040416 CALL ©‘ SETPAT TET HIGH PATTERN FOR CORRECT MEMORY 
6749 START OF PATTERN LOOP 
6750 014306 004737 015450 2s: CALL «sSsCMTEST ;GO TEST CORRECT MEMORY 
6 TERMINATION OF PATTERN L 
6752 014312 005337 002112 bEC PATTERN 1S THIS THE LAST PATTERN? 
6753 014316 1003873 BPL 2$ solN® - LOOP ON THIS PATTERN 
67 TS TERMINATION OF BANK L 
6755 014320 005037 002222 as: CLR CONTFLAG 
6 14 C04737 CALL TNCBNK |NEXT HIGHER BANK 
6757 014330 002 18 ‘IF NOT DONE - LOOP ON THIS BANK 
67 i OF LOOPS 
6759 014332 005737 002126 RLFLAG ;HAVE WE BEEN RELOCATED? 
760 014 00140 S$ 'NO - SKIP 
6761 014 Bef uRN YES - RETURN 
6762 914 004737 036310 S$: CALL RELOCATE ‘MOVE & MAP PROGRAM 
6763 v14 ON.ERROR THEN $RETURN 
014 03001 BCC L117 
014350 207 RTS PC 
014352 LLL7sssssas 
6764 ;*@NOTE*se RECURSIVE CALL 
6765 014352 004737 014256 CALL AR ;CALL SELF 
6766 014356 004737 037122 CALL  _UNRELOCATE ‘UNMOVE & UNMAP PROGRAM 
6767 014362 000207 RETURN 
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SXrers FORWARD PA - 





TTERNS REVERSE O RECURSIVES® SEQ 0159 
6770 014364 BAWPAF: SUBTST <<BANKS WORST FIRST.PATTERNS FORWARD eeRECURSIVE*?>> 
oeeeees ee Inna? Fiat DETTE te ae! 
; SUBTEST BANKS WORST FIRST.PATTERNS FORWARD s«eRECURSIVE*ss 
 OOOSSSSESESESSSSERSSSESERESSESREREEEESERELESEERDEAEDEREREREREESEESESEEESEEOEOES 
6771 014364 005037 002102 CLR BANK :SET BANK TO 0 
677 ;START OF BANK LOOP 
6773 014370 004737 037760 1%: CALL EXBANK ;EXAMINE BANK 
6774 014374 005737 002116 TST ACFLAG ;CAN WE ACCESS THIS BANK? 
6775 014400 001415 BEQ 4$ ;NO - GC TO BANK LOOP TERMINATION 
6776 014402 737 002130 TST BMF LAG iIS THIS ad MEMORY — FIRST)? 
77 001412 BEQ 4$ :NO - GO TO BANK LOOP TERMINATION 
67786 014410 7 002124 TST RRFLAG RELOCATION REQUIRED? 
6779 014414 001007 BNE 4s ;YES - GO TO BANK LOOP TERMINATION 
67860 014416 37 002112 CLR PATTERN iSET PATTERN To 0 
6761 ;START OF PATTERN LOOP 
e768 014422 004737 015450 2s: CALL MTEST ;GO TEST CORRECT MEMORY 
676 ; TERMINATION g PATTERN LOOP 
6784 0144 004737 040402 CALL INCPAT :;GO SEE IF THIS IS THE LAST PATTERN 
67865 014432 0015375 BNE 2s ;NO - LOOP ON THIS PATTERN 
67 hy tee! OF BANK LooP 
6787 014434 005037 002222 4$: CONTFLAG 
6766 014440 004737 040426 CALL INCBNK ;NEXT HIGHER BANK 
67869 014444 002351 BGE i$ ;IF NOT DONE - LOOP ON THIS BANK 
6790 fa OF LOOPS 
6791 014446 005137 002600 OM WORST ;I1S THIS AN EVEN NUMBERED PASS? 
6792 014452 001003 BNE S$ ;YES - SKIP 
679 ;@@NOTE*e RECURSIVE CALL 
6794 014454 004737 0143464 CALL BAWP AF ;CALL SELF 
6795 014460 ogee? RET 
014462 005737 002126 S$: TST RLFLAG ;sHAVE WE BEEN RELOCATED? 
6797 014466 001401 BEQ 6$ :NO - SKIP 
6796 014470 pea RETURN ‘YES - RETURN 
6799 014472 004737 036310 6%: CALL RELOCATE :MOVE E MAP PROGRAM 
6800 014476 ON.ERROR THEN $RET'IRN 
014476 103001 BCC L120 
tet re 000207 RTS PC 
014 LIi2O:issses 
6601 possess RECURSIVE CALL 
ALL ;CALL SELF 


tty 014502 004737 0143564 
6603 014506 004737 037122 CALL UNRELOCATE ;UNMOVE € UNI‘AP PROGRAM 
6604 014512 000207 RETURN 
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ot PATTERNS FORUARD CeRECURSIVES® = 
BAMPAR: SUBTST <<BANKS WORST FIRST.PATTERNS REVERSE **RECURSIVE+s>> 
| OOSSESSEESSESSEESEESSESESESESEEEAESEEEEREERDERESEEROEDERESDEDES EEOC REREREEOSEES 
sSUBTEST BANKS WORST FIRST.PATTERNS REVERSE *sRECURSIVEss 
5 CRASS RESSEESSEESEEERESEESESERERESEESEERESEEEREAEREREESEESEESEEREDREEEEEEEEEDOS 
005037 002102 CLR BANK CSET BANK TO 0 
SSTART OF BANK LOOP 
004737 037760 18: GALL EXBANK EXAMINE BANK 
005737 002116 TST ACFLAG CAN ME ACCESS THIS BANK? 
001415 BEQ as TO BANK LOOP TERMINATION 
737 002130 TST BMFLAG ‘IS THIS BAD MEMORY (WORST FIRST) 
001412 BEQ as ‘NO - GO TO BANK LOOP TERMINATION 
737 002124 TST RRFLAG ‘RELOCATION REQUIRED? 
001007 BNE as ‘YES - GO TO BANK LOOP TERMINATION 
004737 040416 CALL § SETPAT ‘SET HIGH PATTERN FOR CORRECT MEMORY 
START OF PATTERN LOOP 
004737 015450 2%: CALL ;GO TEST CORRECT MEMORY 
sTERMINATION OF PATTERN L 
005337 002112 bEC PATTERN ‘1S THIS THE LAST PATTERN? 
100373 BPL 2$ nofNO - LOOP ON THIS PATTERN 
pTERMINATION OF BANK L 
005037 002222 4s: éLR CONTFLAG 
004737 040426 CALL NCBNK |NEXT HIGHER BANK 
002351 GE i$ IF NOT DONE - LOOP ON THIS BANK 
SEND OF LOOPS 
005137 002600 éon WORST 5IS THIS AN EVEN NUMBERED PASS? 
001003 BNE S$ ‘YES - SKIP 
S@@NOTESs RECURSIVE CALL 
904787 014514 CALL BAMPAR CALL SELF 
005737 002126 S$: TST RLFLAG ;HAVE WE BEEN RELOCATED? 
001401 BEQ 6$ ‘NO - SKIP 
000207 RET ‘YES - RETURN 
004737 036310 6$: CALL RELOCATE ‘MOVE € MAP PROGRAM 
ON.ERROR THEN $RETURN 
103001 Bcc L121 
207 RTS PC 
Li2l:isisss 
;#aNOTEss RECURSIVE CALL 
004737 014514 CALL  BAWPAR ;CALL SELF 
004737 037122 CALL  UNRELOCATE ‘UNMOVE & UNITAP PROGRAM 
000207 RETURN 
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trast PAT PATTERNS S REVERSE 


6844 014644 
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O RECURSIVES® _ 


PAFBAF: SUBTST <<PATTERNS FORWARD.BANKS FORWARD @eRECURSIVEss>> 
j CORERESSEERESSSEEESEEEEESESOREDEESEAERESEEEEEESESEEDESEEEEERESEEEEEEEEESEDOSOS 
s*SUBTEST PATTERNS FORWARD,BANKS FORWARD *eRECURSIVE ss 
| MESES SEEEEESESESEESAEESESESSESEESEEESESEEEESEEEESEEEEHEEEESESEHESEO REESE OEEEE 
CLR PATT ;SET PATTERN TO O 
sSTART OF PATTERN LOOP 


1s: SET BANK TO 0 
START OF BANK LOOP 
2s: CALL EXBANK ;EXAMINE BANK 
CALL BANKOK ;CORRECT MEMORY FOR THIS BANK? 
BNE 43 ‘NO - GO TO BANK LOOP TERMINATOR 
TST ACFLAG iCAN WE ACCESS THIS BANK? 
BEQ a3 TO BANK LOOP TERMINATION 
TST RRFLAG ;RELOCATION REQUIRED? 
BNE as YES - GO TO BANK LOOP TERMINATION 
CALL -~ MTEST ‘GO TEST CORRECT MEMORY 
TERMINATION OF BANK LOOP 
4s: éLR CONTFLAG 
CALL |NEXT HIGHER BANK 
GE 25 ‘IF NOT DONE - LOOP ON THIS BANK 
TERMINATION OF PATTERN LOOP 
CALL INCRPT NEXT HIGHER PATTERN 
BNE 1 ‘OK - LOOP; ELSE CONTINUE 
SEND OF LOOPS 
con THFLAG ;COMPLEMENT TYPE OF MEMORY 
‘IS THIS AN EVEN NUMBER PASS? 
BEQ S$ ‘YES - SKIP 
*#@NOTE*«s RECURSIVE CALL 
baLL | PAFBAF CALL SELF 
RETURN 
S$: TST RLFLAG ;HAVE WE BEEN RELOCATED? 
BEQ 6$ NO - SKIP 
RETURN YES - RETURN 
6$: CALL ‘MOVE € MAP PROGRAM 


RELOCATE 
ON.ERROR THEN $RETURN 
BCC Li22 
RTS PC 
LI2Z2:isssis 
;#@#NOTE*s RECURSIVE CALL 
CALL PAF BAF 


CALL UNRELOCATE 
RETURN 


;CALL SELF 
;UNMOVE € UNMAP PROGRAM 


SEQ 0161 
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eeRECURSIVEs* 


PAFBAW: SUBTST 


<<PATTERNS FORWARD.BANKS WORST FIRST 


SEQ 0162 
*#eRECURSIVEss>> 


‘aT Gat Fon fe at tat aes 
F 


s*SUBTEST 
jneseeacesssensssassansssnnsecninnnagnsessenasenasannsanasennsenasconsseneces 


1%: 
2s: 


4$: 


5$: 


6$: 


7%: 


ERN 
_— OF PATTERN LOOP 
;START OF BANK LOOP 
CALL EXBANK 
— 


CALL 


CALL MTEST 
; TERMINATION OF BANK L 
CLR CONTFLAG 


CALL 


BGE 2$ 3 
TERMINATION OF PATTERN LOOP 
GALL = INCRPT 


PATT 


$ 
ACFLAG 
4e 
BMFLAG 
af 
aa 


BNE 1$ 
END OF Oy kc 


BEQ 5$ 
3*#NOTEss RECURSIVE CALL 
CALL PAF BAW 


S WORST FIRST *#eRECURSIVE 
SET PATTERN TO 0 
;SET BANK TO O 


;EXAMINE BANK 
:;CORRECT MEMORY FOR THIS BANK? 
NO - GO TO BANK LOOP TERMINATOR 
;CAN WE ACCESS THIS BANK? 

TO BANK LOGP NATION 


NO - TERMI 
iTS THIS BAD MEMORY CWORST FIRST) 
TO BANK LOOP TERMINATION 
:RELOCATION REQUIRED? 
YES - GO TO BANK LOOP TERMINATION 
;G0 TEST CORRECT MEMORY 
;NEXT HIGHER BANK 
IF NOT DONE - LOOP ON THIS BANK 


s;NEXT HIGHER PATTERN 
;OK - LOOP; ELSE CONTINUE 


;COMPLEMENT TYPE OF MEMORY 
;IS THIS AN EVEN NUMBER PASS? 
:;YES - SKIP 


;CALL SELF 


RE 

COM WORST ees PASS? 

BNE 6 SKIP 

a ae — CALL 

ay AFBAW :CALL SELF 

TST RLFLAG sHAVE WE BEEN RELOCATED? 
BEQ 7$ sNO - SKIP 

RETURN rYES - RETURN 

CALL ;MOVE € MAP PROGRAM 


RELOCATE 
ON.ERROR THEN SRETURN 
;#@NOTE*s RECURSIVE CALL 
CALL PAFBAW 


CALL UNRELOCATE 
RETURN 


BCC L123 
RTS PC 
Li23S:sssss3 


sCALL SELF 
;UNMOVE & UNMAP PROGRAM 


_ -_—— - A A Lr mm 
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PATTERNS F ees OoRsi FIRST seRECURSIVES® SEQ 0163 
6927 015146 PARBAF: SUBTST <<PATTERNS REVERSE.BANKS FORWARD eeRECURSIVEss>> 
3 Se a a a ae 4266 
;*SUBTEST PATTERNS REVERSE BANKS FORWARD eeRECURSIVE 
$ seseesasessecssesasccsensssnasieansaassensassnssssanaceeassnccnssascnsacennss 
69286 015146 004737 040416 CALL‘ HIPA ;SET HIGHTEST PATTERNS 
START OF PATTERN LOOP 
6930 015152 005037 002102 1s: R BANK ;SET BANK TO 0 
START OF BANK LOOP 
6932 015156 004737 037760 2$: CALL = EXBANK ;EXAMINE BANK 
6933 015162 004737 040364 CALL © BANKOK CORRECT MEMORY FOR THIS BANK? 
6934 O1 001010 BNE as ‘NO - GO TO BANK LOOP TERMINATOR 
o9ss O18170 008787 002116 TST ACFLAG ;CAN WE ACCESS THIS BANK? 
6936 015174 001405 BEQ 4s ‘NO - GO TO BANK LOOP TERMINATION 
6937 015176 737 002124 TST RRFLAG }RELOCATION REQUIRED? 
6958 0! 001002 BNE 4s YES - GO TO BANK LOOP TERMINATION 
01 004737 015450 CALL -‘ MTEST ook” TEST CORRECT MEMORY 
TERMINATION OF BANK 
6941 015210 005037 002222 4s: éLR CONTFLAG 
6942 015214 004737 040426 CALL  INCBNK ;NEXT HIGHER BANK 
6945 015220 C02356 GE 2$ IF NOT DONE - LOOP ON THIS BANK 
6 TERMINATION OF PATTERN LOOP 
6945 015222 005337 002112 OEC PATTERN |NEXT LOWER PATTERN 
6946 015226 100351 BPL is ;0K - LOOP; ELSE CONTINUE 
694 ;END OF LOOPS 
6948 015230 005137 002134 Con TMFLAG ;COMPLEMENT TYPE OF MEMORY 
694 ;IS THIS AN EVEN NUMBER PASS? 
6950 015234 001403 BEQ S$ YES - SKIP 
6 ne ete RECURSIVE CALL 
6952 O01 004737 015146 ALL  PARBAF ;CALL SELF 
6958 015242 000207 RETURN 
6954 O1 005737 002126 S$: TST RLFLAG ;HAVE WE BEEN RELOCATED? 
6955 O1 001401 BEQ 6$ NO - SKIP 
6956 O1 900207 RETURN YES - RETURN 
6957 01 004737 036310 6$: CALL ‘RELOCATE ‘MOVE & MAP PROGRAM 
6958 01 ON.ERROR THEN $RETURN 
O1 103001 BCC L124 
01 000207 RTS PC 
01 Li24:sssese 
6959 ;#@NOTEes RECURSIVE CALL 
6960 01 004737 015146 CALL. ~—s PARBAF ;CALL SELF 
6961 015270 004737 037122 CALL _UNRELOCATE SUNMOVE €& UNMAP PROGRAM 
6962 015274 000207 RETURN 


eee ee 


ee eee 
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BATT ATTERNS REVERSE. BANKS FORWARD eeRECURSIVES® _ SEQ 0164 
6965 015276 PARBAW: SUBTST <<PATTERNS REVERSE.BANKS WORST FIRST **RECURSIVEss>> 


eses 015276 
6968 015302 
6969 


6970 015306 
015312 

01 

6 01 

6974 01 
i 


tite 





352 
015356 


5 0153560 
015364 


$3 oxsse 
6932 rt et tes 
oo 994 915402 
4 


01 


040416 
002102 
037760 
040364 


002116 
002130 
002124 
015450 
002222 
040426 


002112 
002134 
015276 


002600 


015276 
002126 


036310 


015276 
037122 


f FSSSSSSSESSESSSHSSSSESSESSSHESSSSSSSSSSSESSSSSHSSESSSSSESSESSHHAHSSEHESHSEHSSSEKESEHSESE 


s*SUBTEST PATT 


BANKS WORST FIRST *#RECURSIVEss 


REVERSE. 
; CRRSSSERESSSESSSESESERESEESESEREEEEEEEEERESESESERESEERESERERDEEEEEEEREREDEEEEES 
a 


1%: 
2s: 


4$: 


S$: 


6$: 


78: 


:SET HIGHTEST PATTERN 
— OF PATTERN LOOP 


;SET BANK TO 0 
:START OF BANK LOOP 
CALL EXBANK sEXAMINE BANK 
CALL BANKOK ;CORRECT MEMORY FOR THIS BANK? 
BNE ay ;NO - GO TO BANK LOOP TERMINATOR 
TST ACFLAG ;CAN WE ACCESS THIS BANK? 
BEQ S$ - GO BANK LOOP T 
TST BMF LAG ;IS THIS BAD MEMORY CWORST FIRST) 
BEQ 4¢ - GO TO BANK LOOP T 
TST RRFLAG sRELOCATION REQUIRED? 
BNE 4 - GO BANK LOOP TERMINATION 


:¥ TO 

CALL MTEST of” TEST CORRECT MEMORY 
hy elt OF BANK L 

LR CONTFLAG 

CALL I ;NEXT HIGHER BANK 

BGE ee ;IF NOT DONE - LOOP ON THIS BANK 
; TERMINATION OF PATTERN LOOP 


DEC PATTERN ;NEXT LOWER PATTERN 
BPL i$ ;0K - LOOP; ELSE CONTINUE 
fi OF LOOPS 

OM TMFLAG 


;COMPLEMENT TYPE OF MEMORY 

;IS THIS AN EVEN NUMBER PASS? 

BEQ 53% ;YES - IP 
aaa RECURSIVE CALL 
ALL PARBAW 


;CALL SELF 
RETURN 
COM WORST ;4TH PASS? 
BNE 6% ;YES - SKIP 
ere SSTUMSTVE CALL 
cA. PARBAW ;CALL SELF 
TST RLFLAG ;HAVE WE BEEN RELOCATED? 
BEQ 7$ 3NO - SKIP 
RET :YES - RETURN 
CALL ;MOVE & MAP PROGRAM 


RELOCATE 
ON.ERROR THEN $RETURN 
BCC L125 
RTS PC 
Li2S:sssses 
;#@NOTE*ese RECURSIVE CALL 
CALL PARBAW 
CALL UNRELOCATE 
RETURN 


;CALL SELF 
;UNMOVE & UNMAP PROGRAM 


eee” —_— 
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SATTERNS REVERSE. RANKS WORST FIRST O RECURSIVES® _ SEQ 0165 
7010 015450 MTEST: SUBTST <<SUBR SETUP MEMORY TEST>> 
| aaa amy gamma aaa 
' ;* MEMOR 
| § O06606064666666000066060606000046080060000000006000066666000000000000000000000006 
7011 015450 SET HEADER ;INITIALIZE HEADER MESSAGE T 
012737 177777 002612 MOV 1,MEADER 
| 7012 O14 SET MUT ;INDICATE THERE IS A MEMORY vibes Te TEST 
012737 177777 002110 MOV 
7013 O1 37 002264 CLR PASFLG 
7014 015470 005737 002120 TST MKFLAG sECC? 
7015 015474 0014135 BEQ MT1 3NO - SKIP 
7016 4 BEGIN HOLDLOOP nes 
2383833 
7017 O1 IF CONTFLAG IS TRUE THEN LEAVE HOLDLOOP 
1 005737 002222 TST CONTFLAG 
01 001 BNE E15 
7016 O1 IF SKIPMK IS FALSE 
01 005737 002342 TST SKIPMK 
01 001002 BNE L126 
7019 O1 C04737 015544 CALL MKCONTROL 
7 01 END; OF IF SKIPMK 
01 Li26:sssses 
7021 0 END HOLDLOOP 
0 EitS:ssssss 
Ls 4 004737 016772 a MKTEST ;YES - DO ECC TESTS 
7 0 00473 017212 MT1: CALL MJTEST ;00 PARITY TESTS 
7 0 005037 002110 MTe: CLR MUT sNOW - NO Y UNDER TEST 
70 0 SET HEADER ;ALLOW HEADERS NORMAL 
0 012737 177777 002612 MOV #-1,HEADER 
7027 O 000207 RETURN 





—— 
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SUBR SETUP MEMORY TES SEQ 0166 


MKCONTROL : SUBTST <<SUBR TEST ECC CSR LOGIC DISPATCH>> 
§ SOSSSOS6SSSSESEEESEESSESESEESESSESEESSSESSEESEESEEEEESESSESEEEEEEESEESSEEEEEEOEEDE 


7030 015544 





s*SUBTEST SUBR TEST ECC CSR LOGIC DISPATCH 
j POSSESS EESEEEEESESEEEEEESSEEEEESEESEERESEESESESESEESSESEEEEESEEUKEEESEOEEEEEEEEODS 









;THE NEXT TWO MODULES SOLVE THE PROBLEM OF 
;HOW TO RUN THE CSR TESTS ON EACH ECC MEMORY 
5 
IF SELONLY IS TRUE THEN $RETURN 
005737 002002 TST SELONLY 
001401 BEQ L127 
RTS PC | 
Li27:sssass 
IF INHECC IS TRUE THEN $RETURN : 
005737 002536 TST INHECC | 
001401 BEQ L130 
7 RTS PC 
Li3dO:ssssas 
PUSH  BANK,RO,R1,R2,R3 
013746 002102 MOV 
Cl MOV 
010146 MOV 
gi 
01273 002232 MOV oF IRST , CSRFBANK ;SET FIRST TEST ADDRESS TO F 
012737 157776 002234 MOV @LAST , CSRLBANK 
37 0022 CLR CSRINT 
37 CLR SPLTCSR 
37 002332 CLR CSRLOOP ; AND ZERO THE LOOP COUNTER 
013700 002104 MOV BANKINDEX , RO ;GET THE BANK INDEX 
016001 002664 MOV CONF IGCRO),R1 ;GET CSR NUMBER 
042 301 177760 ere e*Ci7.Ri 
01013 MOV R1,CSRHOLD ;STORE IN THE LOW BYTE 
oas737 oosi8e TST INTFLAG ;1S THIS BANK INTERLEAVED? 
00 421 BEQ 13 ;BRANCH IF NOT INTERLEAVED 
002240 INC SPLTCSR 
0 37 120000 002234 MOV #120000 , CSRLBANK 
7 002332 INC CSRLOOP ;WE MUST LOOP TWICE FOR AN INTERLEAVED BANK 
37 002236 INC CSRINT 
01 \ MOV CONFIG(RO),R1 ;GET THE INTERLEAVE CSR NUMBER 
0 12 177775 ASH 6-3, 
042 O1 777 BIC @?C17000,R1 
137 io Bis Ri, CSRHOLD ;STORE IT IN CSRHOLD’S UPPER BYTE 
6337 002526 002152 MKLOOP: MOVB §§ CSRHOLOC(R3),CSRNO 
2737 177741 002152 BIC +036, CSRNO ;CLEAR ANY UNNECESSARY BITS 
FOR MKCNT := 80 TO CSRINT 
005037 016364 m_ CLR MKCNT 
sees es 
FOR CSRFIRST := CSRFBANK TO CSRLBANK BY #4000 
013737 002232 002226 MOV CSRFBANK,CSRFIRST 
Bi7sssssses 
MAP BANK ;MAP TEST SPACE TO BANK 
010346 MOV R3,-(SP) 
013703 002102 MOV BANK ,R3 
004737 035604 CALL #§ MAPPER 





—aameme = oe ad 


CVMJABO MSV 


SUBR TES ‘ete CSR L Loic tC OISPATCH 
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177777 
002264 
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SEQ 0167 
a MOV (SP)+,R3 
INVALIDATE :; INVALIDATE BACKROUND PATTERN 
BEGIN CSRSTUFF 
B20: sssaas 


CLR SUCCESS 
IF ACFLAG IS TRUE AND RRFLAG IS FALSE 





MOV Com rmaT CSRLAST 


C AST | 
FOR TESTADD := CSRFIRST TO CSRLAST BY 04 


MOV CSRFIRST.TESTADD 
' B2i:ssssss 
MOV TESTADD, TESTADD+2 
TST SPLTCSR 
BEQ is 
-~ Spee STEEDS 
i$ ADD #2, TESTADD+2 
2s CALL SBETEST 
ON .NOERR 
BcS L132 
CACHOFF ; TURN CACHE OFF 
CLR NOPAR ; INDICATE PARITY ACTION 


FOR I := #0 TO #27 
CLR I 
B22:issise 
MOV #-1,HEADER 


SET HEADER 
CLR PASFLG 
LET RO := I 


os 





MOV I.RO 
PUSH R3 ;SAVE LOOP COUNTER 
MOV RS, - 5? 
MOV SP,CTLKVEC ;SAVE VECTOR IN CSR OF *¢ 
SUB @2,CTLKVEC 
CALL CSRCASE 
POP R353 sRESTORE LOOP COUNTER 
MOV (SP)+.RS 
END ;OF FOR I : 
tHe 1,027 
BLE B22 
C22: sssssss 


; TURN CACHE ON 
MOV #@-1,SUCCESS 


CACHON 
SET sucCESS 
LEAVE CSRSTUFF 


BR E20 
END ;OF ON.NOERROR 
LiIBS2:isssas 
END ;OF FOR TESTADD 
ADD #4, TESTADO 
CMP TESTADO,CSRLAST 


ee ees — 


= A TCO LTE TEE NR em RN Gm =_ 
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SUBR TES etc CSR LOGIC DISPATCH SEQ 0168 
016210 003711 BLE 621 
016212 E2l:isssseea 
7096 O1 +3 END ;OF IF 
LiBSl:sssass 
7097 O END CSRSTUFF 
0 E20: ssasas 
7096 90 IF SUCCESS IS FALSE 
0 005737 0023534 TST SUCCESS 
01 001012 BNE Li3S 
7099 0 TYPE MSGA34 
0 104401 067257 MSGA34 
7100 o1eees TYPOCS ®BANK,<TYPES BANK NUMBER>,5 
01 013746 002102 BANK. -(SP) +s SAVE BANK FOR TYPEOUT 
3 


3:GO TYPE--OCTAL ASCII 
a 33;TYPE 3 DIGITCS) 
0 ; ;SUPPRESS LEADING ZEROS 


CRF 
TYPE MSGB34 
MSGB34 












7308 8 004737 050354 CALL PERBNK 
710 END ;OF IF SUCCESS 
; LiISS:ssssss 
7104 END; OF FOR CSRFIRST 
1 737 004000 002226 AOdO 
0 023737 002226 002234 cep Cc 
0 003635 BLE 
0 ElL7ssssssss 
7105 0 005237 002240 INC SPLTCSR 
7106 0 END; OF FOR MKCNT 
0 27 016364 INC MKCNT 
0 og 7 016364 002236 CMP MKCNT,.CSRINT 
0 we BLE 816 
0 E'6:sssssss 
7107 ' 737 000002 002232 ADD #2 , CSRF BANK 
: ¢ > 012737 000001 002240 bo @1,SPLTCSR 
7110 8 2¢ 002332 CMP R3,CSRLOOP 
7 : BGT i$ 
7 016 et 015726 JP MKLOOP 
7 i 2 18: ECCINIT ;TRAP ON DOUBLE BIT ERRORS CNORMAL ) 
7114 SET CONTFLAG 
012737 177777 Od2222 MOV @-1,CONTFLAG 
a Er 37 002240 CLR SPLTCSR 
7116 0 POP R3,R2,.R1.RO,BANK 
t+] 0 MOV S -3 ae 
0 >» Oo MOV (SP)-,R2 
+] 0 MOV (SP)+,R1 
: 0 MOV (SP)+,RO 
0 7 002102 MOV (SP)+,. BANK 
vii 01 7 RETURN 
71186 01 MKCNT: .WORD OO ;COUNTER FOR MKLOOP 


= 


_— — 


Sak? TSH edc"ESA Locie orspatcn SOY OF -Oek-08 OrsT Boge BO Sea 0159 


7121 016366 SBETEST:SUBTST <<CHMECK FOR SBE FREE LOCATIONS>> 
$ OOSSSS40S048808400808008000888 EEE eennonensnennssaneasonenssennens 


s*SUBTEST CHECK FOR SBE FREE LOCATI 


| eanee{IN GROER TO DETERMINE IF A LOCATION IS SOE FREE T00 THIS 

































7122 IN GRDER TO DETERMINE IF A LOCATION IS SBE FREE 
? ;WRITE ZEROS WITH ECC DISABLE 
7 sREAD ZEROS 
7 IF NOT ZEROS THEN RETURN ERROR 
? ;WRITE ZEROS WITH ECC ENABLED BUT TRAPS DISABLED 
7 ;READ ZEROS BACK 
7 IF NOT ZEROS THEN RETURN ERROR 
7 STEST THE LOCATION FROM THE PAR'S (WITH NO PROGRAM FETCHES) 
7 :IF THERE WERE ANY SBE’S OR DBE'S THEN RETURN ERROR 
7 ‘COMPLIMENT ZEROS TO ONES WITH ECC DISABLE 
7 ;READ ONES BACK 
7 :IF NOT ONES THEN RETURN ERROR 
7 WR 1ESheCKBITS COMPLIMENT OF BEFORE) 
7140 ; uTTH tee ENABLED BUT. 
714 ;TEST THE LOCATION FROM THE Te baat 8 WITH NO PROGRAM FETCHES) 
u ‘2 ;IF THERE WERE ANY SBE'S OR DBE'S THEN RETURN ERROR 
7144 ‘IF NONE OF THE ABOVE FORCES A RETURN ERROR THEN RETURN NO.ERROR 
PUSH RO,R1.R4 ;PUSH RO.R1.R4 ONTO STACK 
aay .-(SP) 
MOV R1,-(SP) 
MOV R4.-(SP) 
002412 MOV TESTADD,.R1 
002414 MOV TESTADD+2,24 
TESTAREA ;ENTER TEST MODE 
002552 177776 BIS TESTMODE , PSU ;GO TO SYSTEM TEST MODE 
= CRI OFF 
ECC1DIS + OTSABLE ECC ON 1 SELECTED CSR 
CLE CR1), CRO) 
CLR (RL) 
CLR (R4) 
q TST CR1) 
7 TST 4) 
q aE >sENT 
? CLRACSR ;CLEAR 1 SELECTED CSR 
7 CLE CR1), (RO) 
CLR cri) 
(ra) 





sTEST LOC (R1) E TST FOR SBE (WITHOUT FETCHES) 


Er 
spares 


016450 104510 


——— 
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7166 ones IF @BITIS!BIT4 SET.IN CSR 


6452 032737 100020 602150 BIT eBIT1S!BIT4,CSR 
016460 001415 BEQ Li 
7167 016462 SET SKPERR | ;DISABLE ERRGEN'S ERROR PRINTOUT 
16462 012737 177777 002066 MOV #@-1,SKPERR 
7168 016470 104512 ERRGEN 
7169 016472 013700 002460 MOV  ERRADD.RO 
7170 016476 072027 177774 ASH 6-4,.R 
7171 016 042700 177600 BIC #tCi77.RO 
7172 016 IF BANK EQ RO THEN GOTO SBENT 
16 023700 002102 CMP BANK, RO 
016512 001454 BEQ SBENT 
7173 016514 END; OF IF #BIT1S 
016 L134: ! ; 
7174 016514 104471 ECC10IS ;DISABLE ECC ON 1 SELECTED CSR 
7175 016 005111 COM CR1) 
7176 0 005114 COM CR4) 
7177 016522 023711 002614 CMP ONES, (R1) 
7178 016 : BNE 
7179 016 23714 002614 CMP ONES, (R4) 
7180 016534 00104 BNE SBENT 
7182 016536 104503 CLRiCSR ;CLEAR 1 SELECTED CSR 
7163 016 005011 CLR CR1) 
7184 016542 012714 100000 MOV @BIT15,(R4) 
7185 016 7 TST (R1) 
7186 016 001035 BNE SBENT 
7187 0165 022714 100000 CMP @BIT15,(R4) 
7198 016 001032 BNE SBENT 
1190 016 104510 TSTREAD ;TEST LOC (R1) € TST FOR SBE (WITHOUT FETCHES) 
7191 016 IF @BIT1S!8IT4 SET.IN CSR 
016 032737 100020 002150 BIT @#B1T15!B81IT4,CSR 
016570 001415 EQ L135 
7192 016572 SET SKPERR ;DISABLE ERRGEN’S ERROR PRINTOUT 
16572 012737 177777 002066 MOV @-1,SKPERR 
7193 016600 104512 ERRGEN 
7194 016602 013700 002460 MOV ERRADD.RO 
7195 016606 072027 177774 ASH -4,R0 
7196 016612 042700 177600 BIC #tCi77.RO 
7197 016616 IF BANK EQ RO THEN GOTO SBENT 
016616 023700 002102 CMP SANK.RO 
016622 001410 BEQ SBENT 
7198 016624 END; OF IF @BIT15 
016624 Li3SS:ssssss 
7200 016624 104417 KERNEL ;ENTER KERNEL MODE 
7201 01 104473 ECCLINIT ; INITIALIZE 1 SELECTED CSR 
7202 016630 104423 CACHON ;TURN CACHE 
7203 016632 POP R4,.R1,RO sPOP RO,R1 E R4&4 FROM STACK 
016632 012604 MOV (SP)+,R4 
016634 012601 MOV (SP)+.R1 
016636 012600 MOV (SP)+.RO 
7204 016640 $RETURN NOERROR 


016640 CLC 
016642 900207 RTS PC 





~ <r ee 


~ em me ee 


CVMJABO e222 MEMORY DIAG. 
CHECK FOR FREE LOCATIONS 


1045u35 


SBENT : 


CLR1ICSR 
CLEAR 


KERNEL 
ete aM 


POP R4,R1,RO 


SRETURN ERROR 


.DSABL LSB 


(R1),CR4) 


a eae — —— — 
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;CLEAR 1 SELECTED CSR 


;ENTER KERNEL MODE 
ty Mt se 1 SELECTED CSR 


Cc 
;POP RO.R1 € R4 FROM STACK 


SEQ 0171 


- a ee ee eee eee ee 
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ONS _ SEQ 0172 


CSRCASE:SUBTST <<CSR PATTERN CASE STATEMENT>> 


§ FSSSSSSSSS~* FSSESEESESSSSESSESSSSSSSESSSAASSESESSSEHSHESEHSEHASHSS?E FHEKSESHHSESSHEESESESE 


VMJABO MSV11-J MEMORY DI 
CMecK FOR FREE LOCATI 


7216 016672 





;*SUBTEST CSR PATTERN CASE STATEMENT 
j OSSSEESSSESEESEESESERESEESESAEEESESEERSASEEESESEESELERESEREREEEREEEODDEEEOEEEOEES 
7217 016672 CASE RO 
016672 O01 MOV RO,-CSP) 
016674 eves é a 
016676 004737 016 62 JSR PC.L1i36 
7218 ;WARNING IF YOU CHANGE THIS TABLE ALSO 
f ‘9 ;CHANGE “$DDWO” - “$DDWS” CTHE PATTERN BIT MAP) 
7221 ;PAT TIME DESCRIPTION 
i ‘ 016702 020110 MKCSRT: MTO006 3<1 SEC INITIAL DATA TEST 
7 : 
£ ; MSV1i1-J ECC TESTS 
7 016704 023712 MT0044 ; 5 SEC SHIFTING 1/0'S THROUGH CHECK BITS 
7226 016706 020242 MTO0014 ; i SEC BASIC DOUBLE ERROR TEST 
7 016710 Cc23772 MT0045 :<1 SEC SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST 
7 016712 025446 0036 ; 1 SEC CORRECTION CODE TEST 
7 016714 020344 0020 ; 1 SEC SYNDROMES TO CSR ON SINGLE BIT ERROR TEST 
7 01671 pet tte MT0037 :<1 SEC ECC DISABLE TEST 
7 016720 023 0041 ; 1 SEC ADDRESS TO CSR ON DOUBLE BIT ERROR 
7 0167 023626 MT0042 :<1 SEC D S TO CSR ON ERROR TEST 
7235 016724 023662 MT0043 3<1 SEC WRITE BYTE CLEARS SBE TEST 
7 0167 esses MT0046 ; 1 SEC CHECK SINGLE BIT ERRORS WITH ECC DISABLED TEST 
7237 0167 MT0047 :<1 SEC NO CSR UPDATE ON SBE WITH EXSISTING DBE 
7 4 0167 020206 MTO0010 :<1 SEC YTE ADDRESSING TEST 
7 0167 024106 MTO999 ; O SEC NULL TEST 
7240 016736 024106 MTO999 ; oO NULL TEST 
7241 0167 024106 MTO999 ; O SEC NULL TEST 
7242 016742 024106 MTO0999 ; O SEC NULL TEST 
7243 016744 024106 MTO999 ; 2 NULL TEST 
0167 024106 MTO0999 ; O SEC NULL TEST 
7245 0167 024106 MTO999 ; Oo NULL TEST 
7 0167 024106 MTO0999 ; O NULL TEST 
7247 0167 024106 MTO999 ; O SEC NULL TEST 
7248 0167 024106 MTO999 ; oO NULL TEST 
7249 016760 024106 MTO999 ; O SEC NULL TEST 
7250 016762 END ;OF CASE RO 
016762 Li3d6:ssssss 
016762 062616 ADD (SP)-, 
16764 013646 MOV aC SP)+,-(SP) 
016766 004736 JSR PC,@(SP)>+ 
7251 016770 000207 RETURN 


—_— eee ee ee = - 


rr me 


VMJABO 


SR PATTE 
7254 016772 


7255 


7286 


016772 
01 


017150 
7 


017132 
32 


017140 
017142 


N case 


104502 


032777 


001003 
005737 
001402 


104506 
000401 
104472 


005037 
000207 


MEMORY DIAG. 
STATEMENT 


002350 


000002 
000002 
002112 


017132 
017132 


002146 
000002 
017132 
000001 
002350 


002076 
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163636 


002076 
002326 


023234 


024106 


002146 


163530 


MKTEST: 
§ SSSSSSSSSHSSSESSSSSSSSASSSSESSSSSKSSSSSSSSSSHS SESS SSSAESHSHEKSSSESHESEHSESSSEESEESESEE 


; *SUBTEST 


es LOUK SUE UU UY SY ees 


MKPAT: 


SUBTST <<SUBR ECC TEST DISPATCH>> 


ECC TEST DISPATCH 


F @SWO SET.IN @SWR OR ACTFLAG IS TRUE 
BIT @SWO,BSWR 
BNE L137 


TST ACTFLAG 
BEQ L140 
2 EE 333 
ECCDIS ;DISABLE ERROR CORRECTION 
ELSE 
BR L141 
LiI4O:sissas 
CLRCSR ;CLEAR ALL CSR’S 
END ;OF IF — 
saaeae 
MOV @2,NOPAR INDICATE PARITY ACTION 
MOV 02 _PCBUMP STRAPS ADD 2 TO PC 
MOV PATTERN, RO ‘GET PATTERN NUMBER 
A IT A WORD ADDRESS 


SL RO MAKE 
IF MKPATCRO) NE @MTOO34 AND MKPAT(RO) NE @MT0999 


SEQ 0175 


CMP MKPATCRO), OMTOOS4 


BEQ L14 
cH paeerene?.crrenee 
INVALIDATE SINVALIDATE BACKGROUND PATTERN ON "BANK 
END ;OF IF MKPATCRO) Saline 
HOV SP .CTLKVEC ,SAVE VECTOR IN CASE OF 3K’ 


#2, CTLKVEC 

CALL aMKPATCRO) ; INDEX OFF TABLE 

IF @SWO SET.IN @SWR OR ACTFLAG 1§ TRUE 

BIT { —_—_ 


BNE 
TST ACTFLAG 
BEQ L144 


L143: 
= ENASBE ;TRAP ON SINGLE BIT ERRORS. 
BR L145 
ECCINIT ;TRAP ON DOUBLE BIT ERRORS (NORMAL ) 
END ;OF IF #@SWO sie 
CLR NOPAR VINDICATE PARITY ACTION. | * 
RETURN 


NANEe IF YOU CHANGE THIS TABLE ALS 


0 

"$DDWO" - “$DDWS” CTHE PATTERN BIT MAP) 
;PAT TIME DISCRIPTION 
iNOTE MTOO34 MUST BE FIRST E LAST 

MTOO34 ;<1 SEC ;SOFT ERROR - BACKGROUND PATTERN TEST 

MTOO17 ;<1 SEC sHOLDING 1‘S € O'S TEST 
MTOCO7 ;<1 SEC sADDRESS BI T 
MTOOO1 ;<1 SEC sADDRESS TE 
MTOOO2 ;<1 SEC ; COMPLEMENT ADDRESS TEST 





<< e - 
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Cee ett  BTSPATCH _ . SEQ 0174 


7267 017144 017756 
7146 020026 


7266 01 
7289 017150 4 
7 0171 714 
7291 0171 1220 
1393 017160 022842 
7 017162 033532 
7295 017164 025046 
| 7 017166 0235234 
7 017170 024106 
7 017172 024106 
7 017174 024106 
7301 017176 024106 
017 024106 
7303 017202 024106 
017 024106 
7305 017206 024106 
7306 017210 C24106 


AWA 
COCCCOCOO BHR USK OHHH 


atm 


SEC ;sROTATING ZEROS TEST 

SEC ;ROTATING ONES TEST 

SEC MARCHING O'S € 1'S TEST 

SEC ;sREFRESH € re NG DIAGONAL TEST 
SEC ;RANDOM DATA TES 

SEC ;FAST GALLOPING PATTERN TEST 

SEC ;SOB-A-LONG TEST 

SEC sWRITE RECOVERY TEST 

SEC ;BRANCH GOBBLE TEST 

SEC i," ERROR - BACKGROUND PATTERN TEST 
MUST BE FIRST & LAST 

SEC ;sNULL TEST 

SEC ;NULL TEST 

SEC ;sNULL TEST 

SEC ;NULL TEST 

SEC sNULL TEST 

SEC ;sNULL TEST 

SEC ;sNULL TEST 

SEC sNULL TEST 

SEC sNULL TEST 
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SUBR ECC TEST DISPATCH SEQ 0175 
7309 017212 MUTEST: SUBTST <<SUBR PARITY TEST DISPATCH>> 
3 $OO66686666666 6662866806668 5646 6668000606686 64606666 666666662 66660646664 6664646666646 64646466 
; SUBTEST PARITY TEST DISPATCH 
3 SSSESHASSSSASAAASASASSSSASSSHSSASESSSSASASSSSASSKSSSSASHASSSSHSSSSSSSESKSSESESHSAEEAESSESHEA 
7310 017212 012737 000002 002076 MOV #2. NOPAR INDICATE PARITY ACTI 
7311 017 012737 000002 002326 MOV PCBUMP TRAPS ADD 2 TO PC 
12 017 12737 002412 MOV FIRST TESTADD 
7313 017284 012737 960002 002414 MOV @FIRST+2, TESTADD+2 
7314 017242 013700 002112 MOV PATTERN. RO |GET PATTERN NUMBER 
15 017 ASL. RO MAKE IT A WORD ADDRESS 
7316 017 IF MUPATCRO) NE @MTOO34 AND MUPATCRO) NE @MT0999 
17 7 017316 023234 CMP MUPAT(RO), eMTOO34 
017256 001405 BEQ L146 
017260 7 017316 024106 CHP MUPATCRO), @nT0999 
017266 001401 BEQ L146 
7317 017270 104511 INVALIDATE ;INVALIDATE BACKGROUND PATTERN ON “BANK” 
7318 017272 END ;0F IF MuPATCRO) 
017272 $333 
7319 017272 010637 002146 MOV SP .CTLKVEC ,SAVE VECTOR IN EASE OF $k 
7320 017276 162737 000002 002146 SUB 02 CTLKVEC 
reey Orysos 004770 O17sie CALL § @MJPATCRO) ;INDEX OFF TABLE 
7322 017310 905037 002076 CLR NOPAR ‘INDICATE PARITY ACTION 
7323 017314 207 RETURN 
+335 :WARNING IF YOU CHANGE THIS TABLE ALSO 
7326 ;CHANGE “$DDWO" - “$ODWS” CTHE PATTERN BIT MAP) 
7328 TIME OISCRIPTION 
7329 017316 nupat: ‘NOTE NTOOS4 MUST BE FIRST € LAST 
7330 017316 28284 MT0034 ;<1 SEC ;SOFT ERROR - BACKGROUND PATTERN TEST 
7331 017 020110 Hrooo6 fed. SEC SINITIAL DATA TEST 
7332 017 020322 MTO017. _;<1 SEC ;HOLDING 1'S & O'S TEST 
7333 017324 020144 0007 ;<1 SEC ;ADDRESS BIT TEST 
7334 017326 017432 MTOOOL ;<1 SEC ;ADDRESS TEST 
7335 017 017526 MTOO02 ;<1 SEC ;COMPLEMENT ADDRESS TEST 
7336 017332 017642 MTO0003 ; 1 SEC 53 XOR 9 WORST CASE NOISE TEST 
7337 017334 017756 0004 ; 1 SEC ‘ROTATING ZEROS TEST 
7338 017336 0 MTOOOS ; 1 SEC ;ROTATING ONES T 
7339 017340 02042 T0021 ; 1 SEC IMARCHING O°S € i's TEST 
7340 017342 023334 MTOO3S ;<1 SEC ;WORSE CASE NOISE PARITY TEST 
7341 017344 020714 MTOO22 310 SEC ;REFRESH TEST 
7342 017346 0207 MTO023 ;10 SEC ‘SHIFTING DIAGONAL TEST 
7343 017350 0212 T0026 ;<1 SEC DATA TEST 
7344 O17 021012 MT0024 ;20 SEC iEAST | GALLOPING PATTERN TEST 
73845 017354 022342 MTOOS1 ; 3 SEC :s TEST 
7346 017356 022532 MTOO32 ;<1 SEC tORTTE RECOVERY. TEST 
7347 017360 02304 MTOOss 335 SEC ‘BRANCH GOBBLE TEST 
7348 017362 023234 MTO0034 ;<1 SEC {SOFT ERROR - BACKGROUND PATTERN TEST 
349 NOTE nTO034 MUST BE FIRST & LAST 
350 017 024106 MT0999 ; 0 SEC ;NULL TEST 
1 017366 i HT0999 | O ;NULL TEST 
7852 017370 024106 MT0999  ; 0 ;NULL. TEST 
7358 017372 024106 MTOS99 =; 0 SEC ;NULL TEST 
7354 017374 024106 MTO999 ; 0 SEC ‘NULL. TEST 


_— ———— 


Se — eee — —_ 
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SEQ 0176 


7356 
7357 
7356 

7359 017376 


-SBTTL PATTERNS 


.SBTTL MEMORY TEST SETUP ROUTINES 
MTOOOO: SUBTST <<MTOOOO SETUP DATA PATTERN TEST>> 
eee a ye" enemas 


| ; *SUBTEST UP DATA PATTERN TEST : 
3 SEABESEKEARESEEEEEEEEEOEEEEEEEEEEEEEEEEEEOAEREOEEEEOEES$EOEEEEEKEEEEEEEEEEEEEEEEEEEEEE 
7360 017376 37 002300 R REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY | 
7361 917402 012700 MOV OF IRST,RO | 
7 17 012701 MOV @SIZE,R1 
7363 017412 0047 32356 CALL § REGCOPY 
7364 017416 012737 024526 002262 MOV @MTPO0O , SUPDOADD ;ELSE DO PATTERN IN MAIN MEMORY 
7365 017424 004737 024334 CALL §_ SUPDO3 
7366 017430 000207 RETURN 
7367 017432 MTOOO1: SUBTST <<MTOOOL SETUP ADDRESS TEST>> 
3 SSRACKAEASKEASSESREALEAKEESEKOEEEEEEEAEEEEEEEEEOEEOEOEOEEEOS$S4840O646664646606606864640646466466466 
; *SUBTEST 00ul SETUP ADDRESS TEST 
3 SESKSASASEAASSSEASEAERAEKERAKAEAAEEEEEKEEEEEEOEEEEEEEEEEE4EOSEEEEEOEEEEEEEEEEEEEEE 
7366 017432 012737 000001 002300 MOV @1,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
369 017440 C12700 060000 MOV @F IRST,RO 
7370 017444 012701 040000 MOV @SIZE,R1 
7371 0174 737 002456 TST NOSUPER 
7372 0174 L BNE 23 
7373 017456 023737 172252 172254 CMP SIPARS , SIPAR6 
7374 017464 00100 BNE as 
7375 017 BR 3$ 
7376 017470 023737 177652 177654 2%: CMP UIPARS , UIPAR6 
7377 017476 00100 BNE 
7378 O1 012701 030000 3$ MOV @30000,R1 
7379 017504 4$: CLR R2 
7380 017 004737 032356 CALL § REGCOPY 
7381 017512 012737 024552 002262 MOV @MTPOO1, SUPDOADD ;SET UP CALLING ADDRESS 
7382 0175 737 024334 CALL §SUPDO3 
7383 017524 RETURN 
7384 017 MTO002: SUBTST <<MTO002 UP COMPLEMENT ADDRESS TEST>> 
3 RESALSSESCAALEASALASSEAAASASKAIEE4OSE4E4O44$4O5424840646046 46466046446 668266446 46464642046464644666864646666666 
; #SUBTEST MTOOO2 SETUP COMPLEMENT ADDRESS TEST 
3 RSESARACASSSSESSESASSARAALACSEEALSASHARSEAESE4AE$E44444644540 606842462626 468664646664264664664666486 
7385 017526 012737 000002 002300 Vv @2,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
7386 017 12700 160000 MOV @LAST+2,.RO 
7387 017540 012701 040000 MOV @SIZE Ri 
7 17544 704 060000 MOV OF IRST ,R4 
7389 017550 012705 100001 MOV #100001 , 
7390 017554 737 002456 TST NOSUPE 
7393 017 001005 BNE 23 
7 92 017 023737 172252 172254 CMP SIPARS , SIPAR6 
7393 017 001013 BNE 43 
7394 017572 BR 33 
7395 017574 023737 1/7652 177654 2%: CMP UIPARS , UIPAR6 
7396 017 1006 BNE ry 
7397 017 012701 030000 3$: MOV #30000,R1 
7398 017610 012700 140000 MOV #140000 , RO 
7399 017614 012705 120001 MOV #120001.R5 
7400 017 12702 000001 43: MOV #1,R2 
7401 017 010103 MOV R1.R3 
7402 017626 012737 002262 MOV @MTPOO2 , SUPDOADD ;SET UP CALLING ADDRESS 
7403 017634 737 024334 CALL SUPDO3 


—_ 


me ee 
ee -—_— 
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MT0002 SETUP COMPLEMENT ADORESS TEST SEQ 0177 
7404 017640 000207 RETURN 
7407 017642 MTO003: SUBTST <<MTOOO3 SETUP 3 XOR 9 WORST CASE NOISE TEST>> 
3 apa ee en a oo aaa 
os 000 
7408 017642 |seesssseaeeeeescuncensenenssacenenssuseacssconsnsenceasunenanasaasassnaansonses 
otiess o01404 bea tray 
ehrege 900207 caareg «AES PE 
7409 917652 012737 900003 002300 HOV 3 ,REALPAT ‘SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
ii 017664 O37 osasee 1s: Se ECEPWARN s CETUP WARNING CONSTANTS & R2 
7412 017670 012701 060000 28: MOV @FIRST.R1 ‘Ri <-- STARTING ADDRESS 
7413 017674 012703 020000 MOV @20000_R3 
7414 017 00 072327 177770 ASH @-8..R3 :R3B <-- RB / 256. 
7415 017704 012702 000004 MOV 04 ,R2 ;SMALL LOOP SIZE 
7416 017710 ¢€12705 000100 MOV 064. ,R5 ;MEDIUM LOOP SIZE 
7417 017714 104415 SAVREG 
7418 017716 012737 024636 002262 MOV @MTPAOS, SUPDOADD 
7419 017724 008737 024334 CALL SUPDOS ;D0 IT IN MAIN MEMORY 
ras: Oiriss b12787 024676 002262 MOV @MTPBO3, SUPDOADD 
7422 017740 004737 024350 CALL 
7423 017744 022737 000003 002616 4%: CMP ®3.FLIPLOC DONE WITH 4 PATTERNS 
i cnitoes : aactiins ya ‘a :£C0, 177777) :(177777 0): (401 177777) 3(177777 4011? 
7426 01754 000207 RETURN 


CVMJABO MSV11-J MEMORY DIAG. 
COMPL 


MTOOO02 SET 


7426 017756 
7429 017756 
et 


7432 017776 
7433 020002 


7444 
7445 
7446 
7447 020074 


7448 020100 
7449 020106 


EMENT ADDRESS 
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TEST 


002300 
002326 


002262 


002300 
002326 


002262 
025046 


025046 


MTOOO4: SUBTST 
po edema ag ne on a arenas 


s*SUBTEST 
| SERSSSSESESSESEESEESEESEESESESEEDASEESSESAESESSEEEEEEEEEEEEEEEEEEEEEEEOEEEESEEEEE 


CALL 
RE 


MTOOOS: SUBTST 


3 *SUBTEST 
| ROSEREEEEEEOEEEESEEEEDAEEEEEEKEELEDSEEEEEEEEEEE6E4EOE40400460460060606860406060046886 
MOV 


MOV 
CLR 
CALL 
MOV 


rrr me a =- 


SEQ 01786 


<<MTOOO4 SETUP ROTATING ZEROS TEST>> 


SETUP 
»REALPAT 


<<MTOOOS 


;SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 
;TRAPS ADD 4 TO PC 


;WRITE BACKGROUND OF ONES 


;SET UP LINKS 


SETUP ROTATING ONES TEST>> 
nae aye Tt oe” ee eeenanmmmmmaaes 


SETUP ROTATING ONES TEST 


BACKGND 

oF IRST RO 

@SIZE Ri 
@MTPOOS , SUPDOADD 
@MTPOOS+14 , MTPB04+16 


SUPD04 
OMTPA04 +14 ,MTPB04+16 


;SETUP PATTERN NUMBER FOR TYPEOUT € DISPLAY 


;TRAPS ADD 4 TO PC 
;WRITE BACKGROUND OF ZEROS 
;SET UP LINKS 


;RESET TEST’'S ORIGINAL VALUE 


HYO00S. SETUP 
7452 020110 


7453 020110 
7454 020116 
7455 


74 i 

7457 020136 
7458 020162 
7459 020144 


7474 
7475 020240 


—_——_ eee ee eee ee 


-J MEMORY DIAG 
ROTATING ONES 


012737 
00473 

012701 
012702 
612737 
004737 
000207 


012737 
012737 
013704 
eet 

207 


024334 


“TEST 


002300 
002326 
002262 
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- SEQ 0179 


MTOOO6: SUBTST <<MTO006 SETUP INITIAL DATA TEST>> 
| PESOSSESSSESSESEESESESESEEEESESSESESSSESERSSESESSSESSSESESEEESEESSEDEEEHSEEEEOOSEEE 





;@SUBTEST MTOOO6 SETUP INITIAL DATA TEST 
§ SSSSSSSSSSSSEESASHESSSSSSHESHESEESSSASSSSSHSESSSSSSSSSSSSSSSSSSHOSSSHSHSESESSESEEEEES 
MOV 06, REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
MOV @4. PCBUMP ;TRAPS ADD 4 TO PC 
MOV @TESTADD,R1 
MOV @MTPO06, e 
CALL. SUPDO3 ;00 IT IN SUPERVISOR MODE 
MTO007: SUBTST <<MT0007 SETUP ADDRESS BIT TEST>> 


§ SSSSASSSSSSSSSSSHSEAESSESSESSESSSSSSSSSSSHASSSASSHSSSSSSSSSEHSESAESSASASESESESSEEEHES 


; #SUBTEST MTOOO7 SETUP ADDRESS BIT TEST 
f SSSSSSSSSSSSSHSSHEASSSESSSSSSAASSSSASSHESSSSSSSSSSSSHSSHSSSSSSSESESSESESESESESHSESEEEE 
HOV 07, REALPAT -  sSETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
CALL § BACKGND ;0F ZEROS 
MOV OF IRST,R1 
MOV R2 
BIS R2.R1 
MOV @MTP007 , SUPDOADD 
CALL SUPDO3 ;D0 IT IN SUPERVISOR MODE 





RETURN ; 
MTOO10: SUBTST <<MTOO10 SETUP BYTE ADDRESSING TEST>> 
| SORSEEEEEEEEEE EEEEEESEEEEEEEEAEEESEEEEEEEEEEEEEEESEEEEEEEOEEEEEEEEEE665600060888 


:*SUBTEST MTOO10 SETUP BYTE ADDRESSING TEST 
j PHSESHORASESEERESSEEESEESEDDEAESEEEEEEEEEESEEEEEE40O66660660006600668060000000088 


or” —. ;SETUP PATTERN FOR TYPEOUT &€ DISPLAY 


MOV : ;TRAPS ADD 4 TO PC 

MOV TESTADD ,R4 

MOV @MTPO10, SUPDOADD 

a SUPDO3 :D0 IT IN SUPERVISOR MODE 


i A ce om ~ 
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SYOoID” SETUP BYTE ADORESSING TEST _ SEQ 0180 


7478 020242 MTOO14: SUBTST <<MTO014 SETUP BASIC DOUBLE BIT ERROR TEST>> 
| SOSSESSESSSSSESESESEEESESEESEESESESESEEEEERSESEESEEEESSSEESESSSSSEESEEDEEESEEEOEE 
;*SUBTEST MTOO14 SETUP BASIC DOUBLE BIT ERROR TEST 
a «°. ¥ %* ‘Ye ¥. ¥°*: k ne 
IF ACTFLAG IS TRUE OR APTFLAG IS TRUE 












TST ACTFLAG 
ie 
TST APTFLAG 
BEQ L151 
LiSO:sssass 
IF $PASS NE @0 THEN $RETURN 
TST $PASS 
BEQ L152 
RTS PC 
LiS2:ssssss 
END; OF IF ACTFLAG 
LiSi: z: ry 
HOV 814, REALPAT :SETUP. PATTERN NuMBER FOR TYPEOUT & DISPLAY 
LET R1 := #100000 ‘SETUP TEST ADORESS isis inti 
CALL GETCSR ;GET CSR INFO FROM CONFIGURATION vate 
CALL MTPO14 ;00 BASIC DOUBLE BIT ERROR TEST 
CALL UNMAP ;UNMAP KERNAL SPACE 





L 
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MTOO16 SETUP BASIC DOUBLE” BIT ERROR TEST SEQ 0161 
7491 
7492 020322 MTO017: SUBTST <<MTOO17 SETUP HOLDING 1'S & 0'S>> 
, SSSSESSSSESSSSSSSSSESSSSSSSSSESESSSSEEHHESESHSSSSESEHSSHEOSSEEOEEEEEEESEEEEEEEEEEEEEESD 
;@SUBTEST MT0017 SETUP HOLDING 1'S & O'S 
3 $O6666 6646666286066 666666686 608666 086666660086 668666646686660646668686646864666666666 
7493 020 012737 000017 002300 MOV #17, REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
7494 020 012737 025736 002262 MOV @HTPO17 , SUPDOADD 
7495 920 004737 024334 CALL SUPDO3 ;00 IT IN SUPERVISOR MODE 
74% 2 000207 RETURN 
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os veyis do bine 1° 40'S - SEQ 0182 


| 7499 0203544 MTOO20: SUBTST <<MTOO20 SETUP SYNDROMES TO CSR ON SINGLE BIT ERROR>> 
$ COCESSSOSSESEEESEEESESSSESSEEEESEESESEEEEEEEEESEEESSEEESESOESESSOSSEESEDSOSESEEE 


s*SUBTEST MTOO20 SETUP SYNDROMES TO CSR ON SINGLE BIT 
xt’  «%.. ¢ \ Qe 


F ACTFLAG IS TRUE OR APTFLAG IS TRUE 
TST 1c? Apa 


L154 
LiSS:sssass 


TST sPASS 
L155 


IF $PASS NE #0 THEN SRETURN 





LiSS:sssass 
END; OF IF ACTFLAG 
L154:; 


6 
Mov @20,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
MAPKERNAL MAP SP 

LET Ri := #100000 
CALL GETCSR 

CALL MTPODO 

CALL UNMAP 
RETURN 







MOV #100000 ,R1 
FROM CONFIGURATION T 
SR ON SINGLE 





ee 


CV ABO OYA EL DROS TO CSR ON SINGLE GIT ERROR” te a SEQ 0183 





7511 020424 MTOO21: SUBTST <<MTOO21 SETUP MARCHING 0'S & 1'S TEST>> 
§ FSSSSSSSSSSSEASASSHASESASHSSASSSSSSESSESHAESSSSSSSESSASHSSSHSHSSSHESASSHESEHHEESSEKEEEEES 
;#SUBTEST MTOO21 SETUP MARCHING O'S & 1'S TEST 
§ SSSSSESSSSESEAESSSESSSESHESEASSESEASESSSSASHSASESARSESASRSESSESEASSHEESESEAEEHASEEASEEEEEESD 
7512 020424 SET NOSCOPE 
0204864 012737 177777 002440 MOV @-1,NOSCOPE 
020482 000021 002300 MOV @21,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT E& DISPLAY 
2 002632 MOV BAKPAT ,R2 
032516 CALL § BACKGND 
MOV R2,R3 
SWAB RR 
160000 HOV @LAST+2.R1 
060000 MOV OF IRST.R4 
000005 004064 cH @5,PROTYP 1S THIS AN 11/83 
. 
000003 004064 CMP 63, PROTYP ;IS THIS AN 11/24? 
BEQ 33 ;BRANCH IF SO 
000007 002102 che ¢7 .BANK 
140000 MOV 140000,R1 
MOV R1,RS 
000177 002102 3%: cH @177,BANK 
140000 MOV 2140000,.R1 
MOV 1,.R5 
330 002262 53: MOV @MTPA21, SUPDOADD 
024334 CALL 
360 002262 MOV @MTPB21, SUPDOADD 
024350 CALL suPpo4 
026414 002262 MOV @MTPC21, SUPDOADD 
0243 CALL 
50 002262 MOV @MTPD21, SUPDOADD 
024350 CALL suP004 
000177 002102 1%: CMP 6177 BANK 
140000 oO V #140000,R1 
MOV R1.RS 
026330 002262 43: MOV @MTPA21, SUPDOADD 
024334 CALL 
360 002262 MOV @MTPB21, SUPDOADD 
024350 CALL § SUPDO4 
V R4,R1 
026414 002262 MOV @MTPC21, SUPDOADD 
0243 CALL 
50 002262 MOV @MTPD21 , SUPDOADD 
024350 CALL 
440 2$: CLR NOSCOPE 


CvmJ 
MTO0O21 


SETUP 
7559 020714 


020746 
7569 920732 


0207834 
7570 030756 
me ares 
7572 LAL 
7573 021000 
7574 021004 
7575 021010 


004737 
103001 
000207 
012737 
012737 
004737 
000207 


004737 


103001 
000207 


012737 
012737 


012737 
004737 
005037 
000207 


ABO MSV11-J MEMORY DIAG. MACRO 
MARCHING O'S € 1’S TEST 


024122 


000022 
026500 
024334 


024122 


000023 
026500 


177777 
024334 
002004 


_—_- ee 


002300 
002262 


002300 
002262 


a eee re mm 
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wp SEQ 0184 


MTOO22: SUBTST <<MTOO22 SETUP REFRESH € SHIFTING DIAGONAL TEST>> 
oo eae ee a pay ee" cece 
s*SUBTEST MTOO22 SETUP REFRESH € SHIFTING DIAGONAL TEST 
ee t-—- -_—_———<——_- "~*~ een 
CALL KAMITEST ;CHECK FOR KAMIKAZE MODE 
ON.ERROR THEN SRETURN ;IF NOT IN KAMIKAZE MODE RETURN 


Bcc L156 
RTS PC 
pe H 
MOV 022,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
MOV eriTP022 . SUPDOADD 
CALL UPDOS ;D0 IT IN SUPERVISOR MODE 
RETURN 
MT0023: SUBTST <<MTO023 SHIFTING DIAGONAL TEST>> 


FS SSSSEASSHASSASSSSSESSSSASSSESASESESSSSASSHSESSOSASESESHSSESESESEEESEHESESESESEEESESESEEEEEEES 


; *SUBTEST MTOO23 SHIFTING DIAGONAL TES 
—— —< maw << <«¢ ~’% ampeeeeee 


Cc AMITEST HECK FOR KAMIKAZE MODE 
ON ERROR THEN S$RETURN LIF NOT IN KAMIKAZE MODE RETURN 


BCC L157 
Lass RTS PC 
:555555 
MOV 023 ,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
MOV @MTPO22 , SUPDOADD 
SET DIAGFLAG ; IDENTIFY DIAGONAL TEST TO MTPO22 
Vv #-1,D0IAGFLAG 
CALL SUPDO3 ;00 IT IN SUPERVISOR MODE 
CLR DIAGFLAG 
RETURN 


-- <A TLL LOLOL LO LLL LLL EL LE LL LL 


CVMJABO MSV11- 
MTOO023 SHIFTI 
7577 021012 


7576 021012 
7579 pe tet 


> 
oS 
be ee pe pee 


Sires d iets t ttt 


a ee ee eres 


SS pee bet Bet ek et ~ 
PAPUSaoyenRe 





# 


: 
: 
: 


form 
Pe 
Orn 


td ed dd ee 


i 
1 
1 
i 
i 
1 


: 


J 
NG 


MEMORY DIAG. 
DIAGONAL TEST 


024122 


177777 
000924 


137776 
000177 
137776 


027214 
000177 
137776 


027214 
0243 


024350 
002440 


See eee 
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002440 
002300 


MTO0024: SUBTST 


SEQ 0185 


- 


<<MT0024 SETUP FAST GALLOPING PATTERN TEST>> 


§ SSSSSLASSSSSESSSSESHSESSESSSSSSSEHSSSSSSSSSESASSSESESSSSESHSSSHASHSSASHSESHESTESEEESESEEES 


s*SUBTEST 


MTOO24 SETUP FAST GALLOPING PATTERN TEST 


§ SOSSSSSSSASHEESSSESSSESSSSSSESHESSSSESSSASSSESSESSSSSSESSHSSESSSSSSSSSAESHSEHESSSEESEHEES 


7$: 


1$: 


4$: 
2$: 


CALL § KAMITEST ;CHECK FOR KAMIKAZE 
ON.ERROR THEN $RETURN ;IF NOT IN KAMIKAZE MODE RETURN 
BCC L160 
RTS PC 
LiIGO:ssses: 
SET NOSCOPE | 
MOV #@-1,NOSCOPE | 
MOV #24, ,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY | 
MOV BAKPAT ,R2 | 
CALL § BACKGND | 
MOV 2.R3 | 
MOV R3.R4 
SWAB | 
MOV @FIRST,R1 
MOV AST,RS 
CMP 85, PROTYP | 
BEQ | 
CMP 83, PROTYP 
BEQ | 
CMP 07. BANK 
BNE $ | 
MOV 0137776,.R5 
CMP 9177, BANK 
BNE 7$ 
MOV 6137776,R1 
MOV 1,R5 
SAVREG 
HOV @MTPB24 , SUPDOADD 
CMP 0177, LASTBANK 
BNE 
MOV €137776,R5 
SAVREG 
HOV @MTPB24 , SUPDOADD 
300 IT AGAIN FOR COMPLEMENT DATA 
SREG 
SWAB.CéRRD 
SWABOtiédRS 
CALL § SUPDO4 
CLR NOSCOPE 
RETURN 


ee we 


CVMJABO MSV11-J/ MEMORY DIAG. 


garcusccesssS 


Sais 


eS te eens 
ano 





7660 
7661 021474 


MTOO26: SUBTST 


F SSSSSSSSSSSSSSSSSHESSSASASSASSSSASSSSSSSSSSSSSSSSHSSSSSHSSSSHHSSSSSSESSSHESESSSESEEHE 


MTOO26 SETUP RANDOM DATA TEST 


3; *SUBTEST 
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MT0024 SETUP FAST GALLOPING PATTERN TEST —_ 


7616 021220 


<<MTOO026 


SETUP RANDOM DATA TEST>> 


{ SSSSSSSSSSSASSESSSSSSESSSSSSSSSSSSSSESSSSSSSSSSSSSSSSSHHHSSHASSSSSSSSSHSEASHSSSSEEE 


78%: 


1$: 


4$: 


2s: 


MOV 
CLR 


026 ,REALPAT 
PCBUMP 
SEEOLO,RS 
SEEOHI ,R2 
R3,RS 
R2,R4 
OFIRST,R1 
@SIZE/2,.R 
#5, 

1$ 

03 ,PROTYP 
3% 
@7 , BANK 
3$ 


#14000 ,RO 
er) aes 


#14000 ,RO 

@MTPA26+4 .MTPD26+14 
@MTPA26E , SUPDOADD 
SUPDO3 

RANODD 

®MTPB26+4 ,MTPD26+14 
@MTPB26 , SUPDOADD 
SUPDO3 

#177, BANK 

43 

#14000 ,RO 
@MTPA26 +4 ,.MTPD26+14 
@MTPA26 , SUPDOADD 
SUPDO3 


RANOOD 
OMTPB26+4 ,MTPD26+14 
@MTPB26 , SUPDOADD 


SUPDOS 
R3,SEEDLO 
R2, SEEOHI 


TRAPS DO NOT ADD TO THE PC 
; INITIALIZE RANDOM NUMBERS 


;00 WE HAVE AN 11/83 ? 
;BRANCH IF WE DO 


311/24? 
;BRANCH IF SO 


;FOR ERROR REPORTING 
;SET UP NEXT LINK 


:FOR ERROR REPORTING 
;SET UP NEXT LINK 


;UPDATE FOR NEW RANDOM NUMBERS 


SEQ 0186 


ee eee - 
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MTOO26 SETUP RANDOM DATA TEST SEQ 0187 
7664 021476 MTO0O027: SUBTST <<MT0027 UNIQUE BANK TEST>> 
| SESESHESESSESESSEEESESESSSEASSEESSEEAESESEESEESESESESEEEEEEEEEL OOEEEEOEEEOEEOODE 
; #SUBTEST 7 UNI E 
—w—9 << %-© ey ~~ eReeeneeenenee 
7665 ;MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DA 
ress ; WRITE AND READ THE BANK NUMBER IN +f oem CEXCEPT WHERE inc m3} 
sy $4 1278 012737 000027 002300 MOV 27 ,REALPAT onan i" UP PATTERN NUMBER FOR TYPEOUT OE — DISPLAY 
: 
7669 93 012737 024334 002522 MOV @SUPDO3,LINK1 ;SET UP LINK 
7670 Osi 14 SET NOFSMODE 
oat 4 012737 177777 002426 MOV #&-1,NOFSMODE 
7671 O21 STAR27: FOR I := #1 TO #2 
ost 012737 000001 002452 MOV #1,I 
i B2os:sssses 
7672 021550 FOR BANK := #0 TO LASTBANK 
ot 005037 002102 CLR BANK 
1 B24:ssssss 
7673 021534 004737 037760 CALL EXBANK 
7674 ost IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
021 C05737 002116 TST ACFLAG 
021 pad at BEQ@ L161 
021 737 002124 TST RRFLAG 
021552 001033 BNE L161 
7675 : 104511 INVALIDATE ;INVALIDATE BACKGROUND PATTERN ON “BANK” 
7676 LET R2 := BANK 
i 013702 002102 MOV BANK ,R2 
7677 1 012700 060000 MOV @FIRST,.RO 
7678 C2i 010004 MOV . 
79 021570 012701 040000 MOV #SIZE.R1i 
7 osters 010103 MOV R1,R3 
7661 0621576 IF I EQ #1 
rs te 023727 002452 000001 CMP I,@1 
1e36 001005 BNE L162 
ress 02 012737 O27572 002262 MOV OMTPO34 , SUPDOADD 
768 1614 004777 160702 CALL NK 
7664 i END ;OF IF 
1 LiG2:ssssss 
7685 teed IF I EQ #2 
023727 002452 000002 I,@2 
1 001005 BNE L163 
ress 16 012737 027600 002262 MOV @MTPO034 +6, SUPDOADD 
768 16 004737 024334 CALL SUPDO3 
tert END ;OF IF 
i Li6S:ssisss 
7689 021642 END ;OF IF slat 
S388888 
7690 osie4 END ;OF FOR BANK 
1 0052 002102 INC 
: 023737 Ov2i102 002556 CMP BANK ,LASTBANK 
+2 003727 _ BLE 624 
23388888 
7691 osiese END ;OF FOR I 
1656 002452 INC I 
1 023727 002452 000002 CMP I,@2 
021670 003717 BLE B23 
167 E23:ssssess 


021672 
7692 021672 IF FS7FLAG IS TRUE 


a 
ee ee 





a er  - rl ——- _— 
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MSV11-J MEMORY s. 
nYooe? UNIQUE BANK TEST SEQ 0186 


023878 005737 002446 TST FS7FLAG 
re ty oh 0014035 BEQ@ L164 
733 a3 Osi 58 005037 002426 CLR NOF SMODE 
1704 000207 RETURN 
1695 021706 END ;OF IF FS7FLAG 
7 LiIGS:sssaas 
7696 021706 FOR I := #1 TO #2 
ee 012737 000001 002452 —_ MOV #1,I 
2333388 
7697 0g3 734 FOR BANK := LASTBANK DOWNTO #0 
tte 013737 002556 002102 ens MOV LASTBANK , BANK 
2338883 
7696 0217 004737 037760 CALL EXBANK 
7699 17 IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
17 737 002116 TST ACFLAG 
17 001436 BEQ@ L165 
ost? 737 002124 TST RRFLAG 
740 001033 BNE Lié65 
7700 teers LET R2 := BANK 
1742 Ci3702 002102 MOV BANK ,R2 
7701 1746 Ooak ee COM 2 
7708 1 012700 060000 MOV @#FIRST,RO 
770 i 010004 MOV RO,R4 
7704 ost 738 012701 040000 MOV @SIZE, R1 
7705 1762 010103 MOV Ri, 
7706 021764 IF I EQ #1 
0 7788 023727 002452 000001 CMP I,¢@1 
1772 BNE L166 
7707 021774 012737 O27572 002262 MOV @MTPO34 , SUPDOADD 
7708 022002 004777 160514 CALL @LINK1 
7709 022006 END ;OF IF 
L166: sissies 
7710 022006 IF I EQ #2 
023727 002452 000002 CMP I,#2 
022014 001005 BNE L167 
7711 0 16 012737 027600 002262 MOV @MTPO34 +6 , SUPDOADD 
77 004737 024334 CALL SUPDO3 
771 + END ;OF IF 
° LIG7:isssas 
7714 0 tH END ;OF IF 
022030 LiGS:sssses 
7715 ptt ts END ;OF FOR BANK 
20 005337 002102 DEC BANK 
022034 023727 002102 000000 CMP BANK, #0 
eeees 002327 BGE 826 
5044 E26: ssssses 
7716 022044 END ;OF FOR I 
022044 005237 002452 INC I 
022050 023727 Ov2452 000002 CMP I,¢2 
022056 003716 BLE B25 
OD C25: sssasee 
7717 022060 005037 002426 CLR NOF SMODE 
7718 022064 000207 RETURN 


ee ee ee ee 


| Gvoege MSV11-J MEMORY DIAG. 
MT0027 


UNIQUE BANK TEST 


7721 022066 


022140 
7730 146 
146 
1 
77 1 
77 1 
i 
162 
7733 164 
022168 
022170 
‘ 178 
02217 
7734 99906 
vee oseei0 
7737 022214 
"2 14 
7738 022214 
7739 ob2ai4 
22214 
222% 
7700 Sahih 
+tthh4 
; aes8 
7741 023 , 
; 12236 
77 022 
774 026 
7744 O22e° 
7745 ¢ 28 
7746 ¢ 
7748 o2e278 
7749 osse7e 


005237 
023737 
003751 
005737 
001032 
012737 
104502 
004737 


013737 


002264 
177777 
000030 
000001 


024334 
027354 


177777 
177777 
002102 
037760 
002120 


002116 
002124 
040000 
060000 
160306 


002102 
002102 
002264 


177777 
036310 


002426 
002440 
002542 


002310 
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002556 


002264 


002102 


SEQ 0189 
MTOO3O: SUBTST <<MTOO30 SETUP FLUSH OUT DBE’S TEST>> 
pg o9" > uae 0+ ey oo ae a yy nae a &£20066646646646466466466466666664666 
; ¢SUBTEST MTOO3O SETUP FLUSH OUT DBE'S TEST 
f SSSSSSHSSASSS SHSSSSSASSSKSSSSSSHSSSASSSSSSSSASHESSSSHASSSASSSSSSSSSESSEHSAESEEESEE ' 
ct 4 
MOV ULLREL 
MTAOSO: MOV #30, REALPAT ;SETUP PATTERN NUMBER FOR Yyeeout & DISPLAY 
MOV AR ;INDICATE COUNT PARITY ERRORS 
MOV 25003. LINK1 
MOV PO30, SUPDO 
ECCOIS ;DISABLE ERROR CORRECTION 
SET NOF SMODE , NOSCOPE 
MOV @-1,NOFSMODE 
MOV ® = i & NOSCOPE 
FOR BANK := @0 TO LASTBANK 
CLR BANK 
B27:sssess 
CALL EXBANK 
IF MKFLAG IS TRUE 
TST MKFLAG 
BEQ L170 
IF ACFLAG IS TRUE AND RRFLAG IS FALSE 
TST ACFLAG 
BEQ Li7i 
TST RRFLAG 
BNE L171 
MOV @SIZE,R1 
MOV @F IRST .RO 


CALL a_I 
END ;OF If ACFLAG 
LI7isssssss 


END ;OF IF MKFLAG 
END ;OF FOR 


LI7O:ssisss 


INC BANK 
CMP BANK ,LASTBANK 
BLE B27 

C27 ssssssss 


IF PASFLG IS FALSE 


TST PASFLG 
BNE Li72 


SET PASFLG 
MOV @-1,PASFLG 
CLRCSR ;CLEAR CSRS 
CALL RELOCATE 
ON. ERROR 
BCC L173 
ECCINIT AP ON DOUBLE BIT ERRORS CNORMAL) 
CLEAR NOFSMODE, NOSCOPE, FULLREL 
CLR NOFSMODE 
CLR NOSCOPE 
CLR FULLREL 
RETURN 
END ;OF ON.ERROR 
Li7S:ssssss 
MOV NEWBANK , BANK 
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—e eee _— 


MTOOSO SE USH OUT OBE’S TEST SEQ 0190 
7750 022302 004737 037760 E 
| 7 306 004737 022100 CALL MTAOSO 
7 12 Sop de | ECCINIT ; TRAP ON DOUBLI BIT ERRORS CNORMAL) 
7 14 73 037122 CALL UNRELOCATE 
7 000207 
i 7755 END ;O0F IF PASFLG 
LI72:sssaas 
7 104472 ECCINIT ;TRAP ON DOUBLE BIT ERRORS CNORMAL ) 
77 CLEAR NOF SMODE , * NOSCOPE, FULLREL 
005037 002426 CLR NOFSMODE 
005037 002440 CLR NOSCOPE 
005037 002542 CLR FULLREL 


RETURN 
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T0030. SETUP FLUSH OUT DBE’S TEST —_ SEQ 0191 
7761 022342 MTOO31: SUBTST <<MTOO31 SETUP SOB-A-LONG TEST>> 
§ FSSSSSHSSSSSSSSSSSSSSSSSSSSSSESSASSSSHSSSSSSSSSSSSSHSSSSSSHSSHSESSSHEASEHSEESESEEES 
;@SUBTEST MTOO31 SETUP SOB-A-LONG T 
3 $266 6662466464666 66668664666666660468 0666666060 0866646002868066000666666666664604646640466806 
7762 022342 004737 024122 ALL § KAMITEST ;CHECK FOR KAMIKAZE MODE 
7763 022346 aime ON.ERROR THEN $RETURN ;IF NOT IN KAMIKAZE MODE RET URN 
$5 500 a 
LiI74&:sssass 
7764 SET NOSCOPE 
012737 177777 002440 MOV @-1,NOSCOPE 
7765 012737 000031 002300 MOV 31, REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT &€ DISPLAY 
7766 37 002076 CLR NOPAR ;SETUP PARITY ACTION 
776 MAP BANK ;MAP FIRST SO BLOCK MOVE WORKS 
72 010346 MOV R3,-(SP) 
374 013703 002102 MOV BANK ,R3 
004737 035604 CALL HAP MAPPER 
022404 012603 MOV (SP)+,R3 
7768 TESTAREA ;ENTER TEST MODE 
osseee 053737 002552 177776 BIS TESTMODE . PSU ;GO TO SYSTEM TEST MOOE 
7769 022414 BMOV MTPO31,FIRST.SOBLENGTH/2 
4 004537 040732 JSR RS,.BLOCK3 
935420 7 SOBLENGTH/2 
027364 MTPO31 
.OSABL CRF 
7770 022426 104417 KERNEL ;ENTER KERNEL MODE 
777 o2e4 013702 002572 MOV SOBK ,R2 
777 34 «(01 MOV R2,RO 
777 012701 100776 MOV €100776,R1 ;COMPLEMENT OF INSTRUCTION “SOB RO,DOT“ 
7774 0127 MOV @F IRST +SOBLENGTH, RS 
7775 012737 002262 MOV OF IRST+2, SUPDOADD 
777 $4 012737 1 002522 MOV @LAST+2,CINK1 
777 737 002456 TST NOSUPER 
777 901 BNE 1$ 
7779 022470 023737 172252 172254 CMP SIPARS , SIPAR6 
wes o22800 900407 BR té«SS 
77 023737 177652 177654 1%: CMP UIPARS , UIPAR6 
77 10 001003 BNE 33 
77 012737 14 002522 2%: 140000, ,LINK1 
7785 004737 024350 3$: CALL 
7786 02 005037 00244 CLR NOSCOPE 
7787 022530 000207 RETURN 


oe ae 


nY00Si Yoos) SETUP 
7790 022552 


nie sear 

rest canvas 

7825 7 
032730 
022736 


022740 
022744 








J MEMORY OIAG. 


S06 -A-LONG 


004737 
800207 
012737 
0127357 

37 
010346 


oe 


se) 
01023 
012737 


053737 


ONG TEST 


024122 


177777 
000032 
002076 

102 
03 


010247 
177667 


005141 
023044 
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002440 
002300 


172254 


177654 


002524 


177776 


SEQ 0192 


MTOOS2: SUBTST <<MTOOS2 SETUP WRITE RECOVERY TEST>> 
| SOSESESSESEESESEESESEEEEEEEEESEEAESEESEASESEEOSESSSEEEESESEHEESESEEEEEESEDEOOEOS 


; SUBTEST SETUP WRITE RECOVERY T 
os aa ———_- z° _ ~- < eeeeeeee 


EST ;CHECK FOR KAMIKAZE 
GN. ERROR THEN $RETURN LIF NOT IN KAMIKAZE MODE RETURN 


acc Li7s 
RTS PC 
LiI7S:ssssses 
SET NOSCOPE 
MOV @-1,NOSCOPE 
MOV @32,REALPAT ;SETUP PATTERN NUMBER FOR TrPeOuT & DISPLAY 
CLR NOPAR ;SETUP PARITY ACTION 
MAP BANK ;MAP FIRST SO THAT THE BLOCK MOVE WORKS 
MOV BANK ,R3 a 
CALL #$ MAPPER 
-OSABL CRF 
MOV (SP)+,R3 
MOV @10247,RO ;0P CODE OF INSTRUCTION “MOV R2,-C(PC)* 
MOV #177667 ,R1 ;0P CODE OF COMPLEMENT OF INSTRUCTION “JMP (RO)* 
MOV @SIZE/2.R2 ;USED FOR 1/2 BANK LOOP 
MOV R2,LINKi 
MOV OF IRST,R3 
CLR LINK2 
TST NOSUPER 
BNE 18 
CMP SIPARS , SIPAR6 
BEQ 2% 
BR 3$ 
1s: CMP UIPARS , UIPAR6 
BNE 33 
2%: MOV 2140000, R4 
MOV 61 AR 
MOV R2,LINK 
MOV @1.LINK2 
3: TESTAREA ;ENTER TEST MODE 
BIS TESTMODE , PSW :GO0 TO SYSTEM TEST MODE 
;MOVE TEST TO MEMORY UNDER TEST 
43: MOV RO, (R3)+ 
MOV 1, -(R4) 
S08 R2,4$ 
cn 05. PROTYP 
gnOvE LAST opaRt OF TEST TO FASTCITY 
JSR RS.BLOCK1 
MTPOS2 
.OSABL CRF 
S$: KERNEL ;ENTER KERNEL MODE 
MOV @5141.R2 ;O0P CODE OF INSTRUCTION “con -(R1)” 
MOV #108 ,RO ;ADDRESS TO RETURN TO IN R 


———— - 
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RECOVERY TEST _ SEQ 0193 





78 160000 MOV @LAST+2.R1 :TOP OF BANK 
7631 060000 002262 MOV @F IRST , SUPDOADD 
7 002524 TST LINK2 
> § BEQ 63 
| 40000 MOV #140000,R1 
| b24350 6%: CALL §§ SUPDO4 
020000 MOV @SIZE/2.R3 ! 
000110 MOV #110,R5 | 
060000 MOV OF IRST.R4 | 
002524 TST LINK2 : 
BEQ 7% 
014000 MOV #14000,R3 
027442 002262 7%: MOV @MTPO32, SUPDOADD 
024350 CALL § SUPDO4 
440 9%: CLR NOSCOP™ 
10%: RETURN ;THIS RETURN ACTS AS A NORMAL RETURN FROM MTOO32 
;ALSO A RETURN FROM THE “CALL SUPDO4" ABOVE 





Deen ne cence ee ers penetrate eet ete ete — 
—~—— 
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_ MTOO32 ITE RECOVERY TEST SEQ 0194 
7850 023046 MTOO33: SUBTST <<MTOO33 SETUP BRANCH GOBBLE TEST>> 
F SSSSHSESSSSSSSSSSSSSSSSSSSSSSSESSSSSSASSSSSSHSSSSSSSSSSSHSSSSSHSSESSEOSESEHEESESEEE 
; «SUBTEST BRANCH GOBBLE TEST 
§ SSSSSSSSSSSSSSSSESSSSSSSSSSSHSSSSSSSSSSSSSSSSSSSSESSSHSSHASSASHSSANSSHSSSHSEESESSHEEESD 
024122 CALL § KAMITEST ;CHECK FOR K MODE 
ON.ERROR THEN $RETURN ;IF NOT IN KAMIKAZE MODE TURN 
RTS Be 
Li76:sssass 
SET NOSCOPE 
177777 002440 MOV #@-1,NOSCOPE 
000033 002300 MOV @33,REALPAT ;SETUP PATTERN NUMBER FOR TYPEOUT & DISPLAY 
002076 CLR NOPAR ;SETUP PARITY ACTION 
MAP BANK ;MAP FIRST SO THAT BLOCK MOVE WORKS 
102 MOV BANK.R3 a 
03 CALL MAPPER 
-DSABL CRF 
MOV (SP)+,R3 
TESTAREA ;ENTER TEST MODE 
002552 177776 ers TESTMODE ,PSW ;GO TO SYSTEM TEST MODE 
enove MTPO33, FIRST. GBLENGTH/2 
040732 JSR RS, BLOCKS 





; CRF 
KERNEL ;ENTER KERNEL MODE 
060076 MOV @F IRST+GBLENGTH, RS 
060004 002262 MOV OF IRST +4, SUPDOADD 
960002 MOV OF IRST+2.R2 
06000 MOV @FIRST+3.R2 
t ase TST NOSUPER 
172252 172254 cp AT PARS SIPARG 
- 
177652 177654 18: CMP UIPARS , UIPAR6 
140000 002522 2%: ov 9140000, LINK1 
350 3%: CALL § SUPDO4 
os2a40 CLR NOSCOPE 
RETURN 
MT0034: SUBTST <<MTOO34 SOFT ERROR - BACKGROUND PATTERN TEST>> 
J SSSAHSSSSHESSESASSSSHSSASSSSSSAKAESSSSHSSESSSSSSSSSHHSSHESKEKSSHSEHESHHSSESEESEE 
; SUBTEST MTOO34 SOFT ERROR - BACKGROUND PATTERN TEST 
J SSSAROSSSSSSSSSHSSASSSSSSHSHSSSSSSSKSHKSSSHSSSSSSSSSSSSHSHSHSSASKSSSSSESASHASSSSESESEE 
012737 000034 002300 MOV @34,REAL 
012700 MOV @F IRST ,RO 
0 703 040000 HOV @SIZE,R1 
01 002620 MOV SOF TPAT .R2 


“SygagO vac manny OTA 





yess 02 





~~, 





3338 
ef 


333 ~~ ~~~ ~~~ 


190? 





35338 
Baunro 


9 
n 






010103 
013705 002104 
010004 


032765 020000 
001406 


004737 02688e 


000410 
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PATTERN TEST —_ 





R1.RS 
BANKINDEX RS 


MOV 
MOV 
MOV RO.R4 

IF #81713 SET.IN CONFIG+2(R5) 





BIT @#BIT13,CONFIG+2(RS) 
L177 


BEQ 
sBACKGROUND PATTERN IS VALIO 
MOV @MNTPO3S4 +6, 






CALL suUPDOS sREAD IT 
ELSE 
BR L 
LAI7V7ssasass 
s;BACKGROUND PATTERN HAS BEEN INVALIDATED 
MOV @HTPOS4, SUPDOADD 
CALL SUPDOS 
BIS @BIT13,CONFIG+2C(RS) sVALIDATE IT 
END ;OF IF @81T13 
L200: sssazs 
RETURN 
MTOOSS: SUBTST <<MTOOSS SETUP WORST CASE NOISE PARITY TEST>> 


p PEERS REEARSRAKBARKEASEEEEDEOEASEHEHESSTHRSESESCHSABEEHOSCEABARASAKEAKEKESH BARS RHHEELES 


















2 st MTOOSS SETUP WORST CASE NOISE PARITY TEST 
SHEA AREETARARSEEMETARVEEHHSOSEEKHAKERDSASTEASAKDHRYARIGHHAREKSHAEGHKHHAOOHRASAA SALE AZLAD 
MOV $5 -REALPAT | ;SET UP TEST NUMBER FOR DISPLAY 
MOV CONFIGCR3),R1 
SuABCéaRR 
BIc @?C17,R1 
MOY Rt CSRNO 
CMP CSRNO.PGMCSR 
BNE i$ ' 
RETURN 
is: MOV R2 
CALL ;WRITE BACKROUND OF ALMOST ALT. 1'S AND 0’S 
CALL ; 


SUPDOS 
QVFLAG IS TRUE THEN ¢RETURN 


te 


TST QVFLAG 

BEQ@ L201 
TS PC 

L2OLsissasss 


sWRITE COMPLEMENT PATTERN INTO MUT 









SEQ 0195 


| 
| 


CC —_—— 


rr ee ee 
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Stee ev a J ORST CASE NOISE PARITY Tesi _ SEQ 0196 


7921 023446 MTOO36: SUBTST <<MTOO36 SETUP CORRECTION CODE TEST>> 7 
P| $O666662 64064666666 666464646604666 268066466600 46666 6060606660060 660666864646606666066666 
;*SUBTEST MTOO36 SETUP CORRECTION CODE TEST 
3 SSESSESSSEKSESAAESESAEAKAEEEEKEKEOEEKEEKEKAEEEEEEEEEOEOEEEEEEEOEHEEEEHEEEEEEEEEEEEEEEE 

7922 023446 012737 000036 002300 MOV 36, REALPAT SET yP TEST NUMBER FOR TYPEQUT AND DISPLAY 

7923 023454 004737 032562 CALL GETCSR ;GET CSR INFO FROM CONFIG TABLE 

79 023460 005037 002264 CLR PASFLG :;CLEAR LOOP COUNTER 

7 3464 005000 CLR RO iGET TEST DAT 

7986 02 012701 100000 MOV #100000,R1 GET FIRST ADDRESS IN BANK 

7927 72 004737 037646 CALL #§ MAPKERNAL MAP KIPARS AND 6 TO BANK 

7928 023476 004737 027760 CALL # MTPO36 JEXECUTE TEST 

3 004737 037734 CALL § UNMAP ;REMAP KERNAL SPACE 
023506 000207 RETURN 


CVMJABO MSV11-J 


Y OIAG. 
MTOO36 SETUP CORRECTION CODE TEST 


7932 023510 


7933 023510 
7934 16 


7938 
7939 023540 
7940 023544 


012737 
012701 


A TT LT TT TL em mmm 
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MTOO37: SUBTST <<MTOO37 SETUP ECC DISABLE TEST>> 
| POSSESSES SEEESESESESESESES ESSE SESESESEESEESPSEAEESEESEEESLESESESREEEEEOHOREESODE 


;*SUBTEST MTOO37 SETUP ECC DISABLE TEST 


Fs SSSSSSSESSSSASESESSSSESESSSSSSSESESESSSASESSSSSS SSA SSASSAHESSSHSEALESASOSSEHESEEESHEEHEDSE 


SEG 0197 


000037 002300 MOV #37 ,REALPAT ;SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY 
100000 MOV #100000 ,R1 ;SET UP TEST ADDRESS 
CLR RO ;CLEAR DATA TO BE WRITTEN 
037646 CALL MAPKERNAL ;MAP THIS TEST TO KERNEL SPACE 
032562 CALL GETCSR ;GET INFO FROM CONFIG TABLE 
030204 CALL MTPO37 ;CHECK ECC DISABLE 
037734 ay UNMAP ;REMAP KERNEL SPACE 


CVMJABO MSV11-J MEMORY DIAG 
MT0O37 SETUP ECC DISABLE TEST 


7942 023546 
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SEQ 0198 


MTOO41: SUBTST <<MT0041 SETUP ADDRESS TO CSR ON DOUBLE BIT ERROR TEST>> 


ee eee cee Saeenee te Ean Gn Ee Gt oe 


7943 02 
7944 
7945 023 
7946 O23 
7947 323572 


7 3620 
1988 023624 


012737 
004737 
012737 
012701 
023727 
001004 
012737 
000403 
C12737 


004737 
000207 


024334 


;*#SUBTEST MTOO41 


SETUP ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 


sOaee eee eat REM PAT SETUP PATTERN AMD CAR@ER FOR TYPEOUT At 


002300 MOV $41 ,REALPA ;SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY 
CALL GETCSR ;GET CSR NUMBER AND ADDRESS FROM CONFIGURATION TABLE 
LET SUPDUADD := @MTPO41 ;SET UP TEST ADDRESS | 
002262 MOV OMTPO41 , SUPDOADD 
LET R1 := @FIRST ;SET UP FIRST ADDRESS 
MOV OF ikST,R1 ' 
IF BANK EQ #177 ;ARE WE AT BANK 177? 
000177 CMP BANK,.@177 
BNE L202 | 
LET PASCNT := #12. 
002570 MOV #12. .PASUNT 
ELSE 
BR L203 
L202: sissies | 
LET PASCNT := #16. 
002570 MOV #16. ,PASCNT 
END 
eee ee 
ay SUPDO3 sEXECUTE ADDDRESS TO CSR TEST IN SUPVISIOR MODE 
URN ; 
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GyOOaT. SETUP ADDRESS _ 


TO CSR ON DOUBLE BIT ERROR TEST SEQ 0199 
7955 023626 MTO0042: SUBTST <<MTOO42 SETUP EXTENDED Q-BUS ADDRESS TO CSR TEST>> 
| PHRSESOSSESESESESESESESSSEEESEERASEELAEESEESESESSSEESAEEERESSES SEE KOEEDEEEDEEES 
s*SUBTEST MTOO42 SETUP EXTENDED Q-8US ADDRESS TO CSR TEST 
arabe" "es Eg gee 
7 oasees 012737 000042 002300 MOV #42 ,REALPAT ;SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY 
7957 0236 012701 100000 MOV #100000 ,,R1 ;SET UP TEST ADDRESS 
7 023640 737 037646 CALL MAPKERNAL ;MAP TO K SP 
7959 023644 004737 032562 CALL GETCSR ;SET UP CSRINFO FROM et ogi TABLE 
7960 023650 004737 0304350 CALL MTPO42 oo EXTENDED Q-BUS ADDRESS TO CSR 
7961 023654 004737 037734 CALL P ;REMAP KERNEL SPA 


CVMJABO MSV1 


MTO0042 SET 


7964 0235662 


9 
023710 


023770 
023772 


023772 
24000 


-J MEMORY DIAG. 
EXTENDED Q-BUS 


012737 
004737 


012737 
004737 
012737 


012701 
023727 
001004 


012737 
000403 


012737 


004737 
000207 


012737 
004737 
012701 
004737 
004737 
000207 
012737 
004737 


012701 
37 


o32562 
031112 
060000 
002102 


120000 


160000 


024334 


000045 
037646 


100000 
031434 
037734 


000046 
037646 


100000 
031622 
037734 


MACRO Y 
ADDRESS 


002300 


002300 


002262 


000177 


002562 


002562 


002300 


0023500 
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10 C&R TEST - 


MTOO43: SUBTST 
s*SUBTEST 


MOV 


CALL 

LET R1 : 

CALL MTPO43 

CALL UNMAP 
RETURN 

MTO0044: SUBTST 

; *SUBTEST 


MOV 
CALL 


GETCSR 
LET SUPDOADD : 
LET Ri : 
IF BANK EQ #177 


LET ENDADD : 


ELSE 


LET ENDADD : 


CALL SUPDOS 


RETURN 
MTOO45: SUBTST 
; *SUBTEST 


RETURN 
MTO0046: SUBTST 
; *SUBTEST 


MOV 
CALL 


LET R1 : 
CALL MTPO46 





SEQ 0200 


SETUP WRITE BYTE CLEARS SBE TEST>> 

| SESSSSEESESEEEESESEESEEEEESEESESEEEEESEAESESESESE SESE AESAESESEESEEEEDEEDEEEEDEOES 
SETUP WRITE BYTE CLEARS SBE TEST 

Eee eee ee eee e eee eee UD TERT MANEER FOR TYPEDUT AOD BIS? 


‘Sp UP TEST NUMBER FOR TYPEOUT AND DISPLAY 


TO KERNEL 


SPACE 
:SET UP TEST ADDRESS 


;PERFORM WRITE BYTE TEST 
sREMAP KERNEL SPACE 


SETUP SHIFTING 1/0'S THROUGH THE CHECK BITS TEST>> 
j SERRESEEEEESEESEESESE SESS REEESELESSSERESASEESESSSESESSESEESEEDESEEESESEEEEDEODS 
SETUP SHIFTING 1/0'S THROUGH THE CHECK BITS TEST 

| SOREEREEAEREESEEESESEEEREEEEESEEEEEEEEEEEEEEEEEEEOEADSEEDEOEEEEEEESEERESEEESEOD 


V #100000 ,R1 


;SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
T CSR NUMBER 


;GE AND ADDRESS FROM CONFIGURATION TABL 

:SET UP TEST ADDRESS sil 
MOV @MTPO44 , SUPDOADD 

;SET UP FIRST ADDRESS sit 


MOV @FIRST,R1 


;ARE WE AT BANK 177? 
CMP BANK, 0177 
BNE L204 


MOV #120000, ENDADD 


BR L205 
L204: isscee 


MOV #160000 ,ENDADD 


L20S:ssssai 
sEXECUTE ADDDRESS TO CSR TEST IN SUPVISIOR MODE 


SETUP SYNDROMES TO CSR ON DOUBLE BIT ERROR>> 
| RORRAAESERESEEEREREAEESSERERESESSLELELES GAREREEEEEEEREEEEEEEEEEEEEEES SESE EEEDLE 


MTOO04S SETUP SYNDROMES TO CSR ON DOUBLE BIT E 

j RRRSRAESEEREEESEEAEREEEESASCESERAEEAARESESEEEDRESEEEEEEEEDAEDEEEEEEEEEEEELREDODEDDE 
#45 ,REALPAT 

CALL MAPKERNAL 

LET Ri := #100000 

CALL MTPO4S5 

CALL UNMAP 


sSET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
;MAP TO KERNEL SPACE 
;SET UP TEST ADDRESS 

V #100000,R1 


MO . 
sPERFORM SYNDROMES TO CSR ON DOUBLE BIT ERROR 
;REMAP KERNEL SPACE 


: 
SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET>> 
| RRERESEASEEEASEESEERESEEEEEEEEEEEDEEELEEDEERESEEEEESEO64E00600060000060060000800088 


MTOO46 SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET 
OE ee ee eee eat nt eeneer is TET SUE FOR THPEDUT DOD Onee 


;SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
;MAP TO KERNEL SPACE 
;SET UP TEST ADDRESS 


MOV #100000,R1 
;PERFORM TRAPS DECTECTED ON SBE WITH ECC DISABLED TE 
;REMAP KERNEL SPACE 


a 


cvnazo MSV1i 
MTOO46 SET 


7997 024052 


799@ 024052 

7999 024960 
8000 

8001 024070 

70 

024074 

8003 024100 


| 
8004 024104 


“tHe 
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012737 
004737 


012701 


000047 002300 
037646 


100000 


120000 
032162 
037734 
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YOS.02 
SINGLE BIT ERRORS WITH ECC OI ED TET 


MTOO47: SUBTST <<MTO0047 


SEQ 0201 


SETUP NO CSR UPDATE ON SBE WITH EXSISTING DBE TEST>> 


{ SSEHSSSEESESSESESASSESESSESSESSASSSSESHSESSHSEASSSSASHAASSSSHSSESHSHSSESSEAEKESSEESEEESEED 


;*SUBTEST MTO0047 SETUP NO CSR UPDATE ON SBE WITH EXSISTING DBE TEST 
——e ne) moe SO ORO UD 


CALL MAPKERNAL 
LET R1 := #100000 


LET R2 := #120000 


CALL MTPO47 
CALL UNMAP 
RETURN 


;SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
;MAP TO KERNEL SPACE 
;SET UP TEST ADDRESS 

MOV #100000,R1 


; “ “ SECOND TEST ADORESS 


#120000 ,R2 
;PERFORM NO UPDATE TO CSR ON SBE WITH DBE 
;REMAP KERNEL SPACE 


CVMJABO 
| MTO047 


ee ee ee 


8007 024106 


ee 


005037 
012737 
000207 


MSV11-J MEMORY DIAG 
SETUP NO CSR UPD 


002300 
177777 


002006 
0u23550 
002352 


002344 


—— ee ee 
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° MACRO YOS.02 nok 
ATE ON SBE WITH EXSISTING TES 


MTO999: SUBTST <<MTO999 SETUP NULL TEST>> 
| CERES SSSSSSSESEEEEEESSESERESAEERESESESESESAASERASAESASEEEEEESEESEAESEEEEDEEEEESS 


s*SUBTEST SETUP NULL TEST 

j RHSSEESESESESEESESESESESSEEASESERERESESSEEEESASESEEEEREREDREEEEEEEDEEEDEEOEODOEE 
CLR REALPAT 
SET NULLFLAG 
RETURN 


KAMITEST:SUBTST <<CHECK FOR KAMIKAZE MODE>> 
| AASRORASEEESEESSEEEEEESLSEEEAEESEESAASEEEESSEEESEEESREEEEEEEEEEESEEEEEEEEEEEOEDES 


; *SUBTEST CHECK FOR KAMIKAZE MODE 
| SRAREEAERESEEESEEASESESEESSEESEREREEASEEESEALEAEESESEEEEEESE$OO946000000000060608088 


IF KAMIKAZE IS TRUE OR ACTFLAG IS TRUE OR APTFLAG IS TRUE 
TST KAMIKAZE 
BNE L206 
TST ACTFLAG 


TST APTFLAG 
BEQ@ L207 


MOV @-1,NULLFLAG 


L206: sissies 
$RETURN NOERROR ;RUN THE TEST ae 
RTS PC 
ELSE 
BR L210 
L207 :ssssss 
$RETURN ERROR ;DON’‘ T RUN THE TEST 


SEC 
RTS PC 


END ;OF IF KAMIKAZE 
L210:sisies 


SEQ 0202 


— 


Ne EE 


we eee ee eee —_ 
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CHECK FOR KAMIKAZE SEQ 0203 





8020 024156 SUPDO1: SUBTST <<SUBR EXECUTE PATTERN IN SUPERVISOR>> 
3 9626666666066 6460046466666 6606646608 606666606 66066656666 4806606666460466466666666646646666 
| eSUBTEST SUBR EXECUTE PATTERN IN SUPERVISOR 
3 $22606666 4642646464668 6206 040260666 6868 60442466666 0646660606646660646666006664640664666666066 

8021 024156 MAP BANK {MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

024156 010 MOV R3.-(SP) 
024160 013703 002102 MOV BANK.R3 
024164 737 035604 CALL § MAPPER 
“DSABL CRF 
170 012603 MOV (SP)+.R3 
8022 024172 004737 051336 SuPDO2: CALL  GETDIS 
802 176 PUSH _ $LPERR. $LPADR 
76 013746 002624 MOV $LPERR. -(SP) 
013746 002622 HOV $LPADR,-(SP) 
8024 010037 1 MOV RO, SUPDRO 
12 012700 002162 MOV @SUPDR1 .RO 
010120 MOV R1,(RO)> 
01 MOV R2°CRO)> 
010 MOV R3_CRO)+ 
€10420 MOV R4;CRO)> 

80 610520 MOV RS;CRO)+ 

80 01 MOV SP CRO)s 

80 013700 160 MOV SUPDRO, RO 

8033 024286 012737 024252 002622 MOV @TAG4$ . SLPADR 

80 013737 5 002624 MOV $LPAOR. $LPERR 

8035 012700 002176 TAG4$: MOV @SUPDR6+2.RO 

014006 MOV -CRO), SP 

8037 01 MOV -(RO)_.RS 

8038 014004 MOV -€RO)_R4 

8039 014003 MOV -€RO).R3 

014002 MOV RO) R2 
804 014001 MOV ~€R0) RI 
04 72 014000 MOV CRO) RO 
5 74 SUPERVISOR ENTER SUPERVISOR MODE 
024274 052737 040000 177776 BIS @61714,PSW GO TO SUPERVISOR MODE 

8044 024302 012706 000740 HOV SSUPSTK, SSP 

8045 104424 CACHOFF ;TURN CACHE OFF 

8046 10 004737 177640 CALL FASTCITY CALL TO THE USER INSTRUCTION PAR’S 

804 14 104423 CACHON TURN CACHE ON 

8048 6 104417 KERNEL ENTER KERNEL MODE 

8049 SCOPE 

8050 2 POP SLPADR, SLPERR 

024 012637 002622 MOV (SP)+.$LPADR 
024326 012637 002624 MOV (SP)+,$LPERR 
8051 0243 207 RETURN 


ae Se eee 
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EXECUTE PATTERN IN SUPERVISOR ; SEQ 0204 
SUPDOS: MAP BANK ;MAP SUPERVISOR SPACE (TEST all 3 BANK 
i MOV BANK RS 
| CALL MAPPER 
| .0 CRF 
MOV (SP)+,R3 
SUPDO4: CALL GETDOIS 
PUSH $LPERR, $LPADR 
MOV SLPADR, -(SP) 
MOV RO, SUPDRO 
MOV @SUPDR1,RO 
MOV R1,CRO)+ 
MOV R2,.CRO)+ 
MOV R3,CRO)+ 
MOV R4,CRO)+ 
REE 
oe 
MOV SUPDRO , RO 
002622 MOV @TBG4$ , $LPADR 
002624 MOV $LPADR , $LPERR 
TBG4$ : MOV es 
MOV -CRO),.RS 
MOV -CRO),R4 
MOV -CRO) ~R2 
MOV -CRO) o Ri 
TESTAREA sENTER SUPERVISOR MODE 
177776 BIS TESTMODE ,PSW :GO TO SYSTEM TEST MODE 
-OSABL CRF 
TST NOSUPER 
BEQ 1% 
Sy @USESTK , USP 
1$: MOV @SUPSTK, SSP 
2s: CACHOFF ; TURN CACHE OFF 
CALL SSUPDOADD. 
CACHON ; TURN CACHE ON 
KERNEL sENTER KERNEL MODE 
SCOPE 
OP $LPADR , $LPERR 
MOV CSP)+, $LPADR 
MOV CSP)+, $LPERR 
RETURN 
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REHORY TEST PATTERN ROUTINES 


SEQ 0205 


a ee ee ee 


6091 .SBTTL MEMORY TEST PATTERN ROUTINES 
TTT TTT TTT TTT TT TTT TTT TTT TTT TT TTT TTT TT TLL 
$99 98 ; PATTERN REGISTER CONVENTIONS 
8094 ; RO FIRST ADDRESS OF PATTERN (FIRST,.LAST+2,ETC) 
8095 ; Ri NUMBER OF SSES IN PATTERN (SIZE) 
8096 ; R2 DATA FOR PATTERN CONES, 52525, ETC) 
8097 ; R3 COPY OF Ri CIF NECESSARY) 
8098 ; Ra cop CIF NECESSARY) 
8099 ; RS COPY OF R2 (IF NECESSARY) 
8100 { SSSSSSSSSSSSSSSESSSSSSSSEKSSSASSSSSSSSSSASCHSESSSSSSASSSSSHSESSSSSHHESSSEESSHASHSSESEE 
8101 024526 000: SUBTST << BASIC DATA TEST>> 
§ SSSSSSSSASASSSSESSSSSSSESSSHSSESSESSSASASSSSSASSSEAASSESSSSSESSESSSSESSESESSSASKEEESE 
; #SUBTEST BASIC DATA TEST 
s SSSSOHSSSSASSASSSAASSSSSSSSESASSSSHESSESSSESSSSSASSSHSESSSESESSHAESSSESSSESEKESSSESESEEE 
8102 024 010220 is: MOV R2,(RO)+ 3V177 
810 077102 S08 Ri. MTPOOO 3V177642 
8108 NOP 3V177644 
8105 012401 2%: MOV (R4)+,R1 ;V177646 
8106 020102 CMP R1,R2 ;V177650 
810 601402 BEQ 33 :V177652 
8108 104430 3V177654 
61 NOP ;V177656 
6110 077 3$: 508 R3,2$ ;V¥177660 
61i1 50 000207 RETURN :V177662 
6112 024552 MTPOO1: SUBTST <<MTPOO1 S TEST>> 
p SReEHEREARAREAREKEDASEAEEHEEHERHMARAREKHEESAPHSEEASHHKERHEAEHEHARESEEAAASREEHEESHALABHEES 
; *SUBTEST MTPOO1 ADORESS TEST 
RRR AHKAEEBARHARGAHKARBAREHREREARAKRERHEHEAEEBAKEARERAAAKECAHEKERARHHEEAREAEHEEAHKED LHD SE 
8113 024352 010220 3$;: MOV R2,(RO)+ 3V177 
6114 702 000002 ADD : ;V177642 
6115 024 077104 S08 R1,3$ ;V177646 
8116 000240 NOP ;V177650 
611 012400 1s: MOV CR4)+,RO ;V177652 
8118 020005 CMP RO.RS ;V177654 
61 © 001401 BEQ 23 3V177656 
ry 72 1 7 PERROL 3V177 
1 7 705 000002 2%: ADD 02,R5 3V177662 
122 024600 077307 S08 R3,1$% ;V177666 
i 924602 7 RETURN vV177672 
tt MTPOO2: SUBTST <<MTPOO2 COMPLEMENT ADDRESS TEST (WRITE DOWN. READ UP)>> 
§ SESSSSESSSSSSSSASSSHOSSESALERSSSSSSSSSSESSSSSSSSESSESESSESSSSSSESESSSSSKESESESOESS 
; sSUBTEST COMPLEMENT ADDRESS TEST (WRITE DOWN, READ UP) 
f SSRHSSSKASHSSASSSEASHAASASASSSSSSSSASEASEASSASSSASSSESSSESSEKNSAESEESEEESESEESEEEE 
8125 024604 010540 3$: MOV RS, -CRO) ;V177640 
Ht 705 000002 62.25 ;V177642 
12 077104 S08 R1,3$ ;V¥177646 
81 14 0 NOP ;V177650 
& 16 162702 000002 is: SUB @2,R2 ;V¥177652 
61 2 012401 MOV (R4)+,R1 ;V177656 
81 102 CMP R1,R2 ;V¥177660 
81 001401 BEQ 2$ ;V177662 
81 04430 PERRO2 :V1 77664 
8134 32 077307 2$: SOB R3,1$ V177666 
8135 024634 207 RETURN :V177670 
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ADDRESS TEST CWRITE DOUN, READ UP) _ 


MTPAOS: SUBTST <<MTPAOS 3 XOR 9 WORST CASE NOISE TEST CWRITE)>> 
§ SESSSSSSEESEEESEEESSESASESSESSEEESSEESSSESEEESSEESEESEEEEEEEEEEESEEEEEEEEEEEEEEEEDEES 
3; *SUBTEST MTPAOS 3 XOR 9 WORST C NOISE TEST CWRITE) 
§ SESSSSAESEESEESEEESESSAESSEEAESSESSESESAESESESASEEASSHHESSEHHEESEEESESEEEEDEOEEES 
;R1 = 
sR2 = SMALL LOOP CONSTANT 
;R3 = NUM OF ADD TO TEST CLARGE LOOP) 
;R4 = GOOD DATA 
;RS = MEDIUM LOOP CONSTANT 
-ENABL L 
1%: MOV R4,CR1I)+ 3V177640 
MOV R4,CR1)+ :V177642 
R2.1$% 3V177644 
COM 4 :V177646 
BIS CPC)+,R4 ;¥177650 
WARN2: 401 :V177652 WARNING LOCATION IS MODIFIED BEFORE LOADING 
MOV 04 ,R2 ;V177654 
RS5.1$% 3; V177660 
COM RA ;V177662 
BIS CPC)+,R4 :V177664 
WARNS: 401 :V177666 WARNING LOCATION IS MODIFIED BEFORE LOADING 
MOV 64. .R5S :V177670 - 
R3,i$ , ;V177674 
RETURN , ;V177676 
.DSABL LSB 
MTPBOS: SUBTST <<MTPBOS 3 XOR 9 WORST CASE NOISE TEST CREAD)>> 
PITT iti ttt titi i tir ii tit iiiitittitri ti itiitiittitiitittititiitti itt i titi titi it. 
3; «SUBTEST MTPBOS 3 XOR 9 WORST CASE NOISE TEST CREAD) 
awcimeaians: =«=ig’ SG UUSapiaa a0 enya cicoenee nanan en eemueeneunmmcamenes 
i$: JMP BeONTPCOS ;V177640 - GO TO V172360 
SoB R2,1$% ;V177644 
COM ;V177646 
BIS CPC)+,R4 3V¥177650 
WARN4: 401 :V1776S2 WARNING LOCATION IS MODIFIED BEFORE LOADING 
MOV 64 ,.R2 ;V177654 
RS.1$8 :Vi77660 
4 :V¥177662 
CPC)+,R4 3V177664 
WARNS: :V¥177666 WARNING LOCATION IS MODIFIED BEFORE LOADING 
64. ,R5 3V177670 3 
R3.1$% 3;V177674 
3;V177676 





RETURN 
.OSABL LSB 


SEQ 0206 
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MTPBOS 3 XOR 9 WORST CASE NOISE TEST CREAD) SEQ 0207 
6179 024736 MTPCOS: SUBTST <<MTPCOS TEST DATA SUBPROGR 

| PERESSSSEEEESESSSESESESESSSSSSESSASSEESSSSSHSEEHSSESEESEKESEHESEDOEHEEOEHEDOEEOEES 

3; *SUBTEST MTPCOS TEST DATA 

| PESESESSSSESEESESEEEESEESEEESESEEEESESEEEEEEESEEEEEEEEEEESEOEEEEEEDEDEDESEOOEOEES 
CMP R4,CRi)+ 3V17 
BEQ is 7V1i 
PERROS 3V¥1723564 

is: COM -CR1) 3V¥172366 
COM CR1) :¥172370 

024754 JMP SeMNTPDOS 3Vi72372 GO TO V172260 

MTPDO3S: SUBTST <<MTPDOS TEST DATA SUB >> 

§ 98606066666046060600000600666086006060066606060000066066600660606000060006006600008 

3; *SUBTEST MTPDOS TEST DATA SUB AM 

§ 9O606080560006000006650680026060606060666606686006606006060600666606606600060004600008 
CMP 4,CR1)+ 3V17 
BEQ 3V1i 
PERROS :¥172264 

i$: COM CPC)+« :Vi72 
0 :V¥172270 
BNE MTPCOS 3Vi72272 GO TO V172360 

024702 Jrp BEMNTPBOS +4 3V172274 GO TO V177644 





ae weer - ee 
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MTPDOS TEST DATA SUBSUBPROGRAM SEQ 0208 


6197 024774 MTPAO4: SUBTST <<MTPAO4 ROTATING ZEROS TEST>> 
§ CSESESEEEEEEESESEESEEESESASEESES ESE EESESEESEESESEEESESESESSEHOSESE HS EEESESEEEESESESS 
; #SUBTEST MTPAO4 ROTATING ZEROS TEST 
| PEaAREESEESSASESAAASSSASSEASESESEEESSE SESE EESESEEEESEEESESESESESEE SEES EEE EEEEESESS 
8198 024774 012705 000010 i$: V . RS ;V177640 
8199 025000 010504 MOV RS5,R4 3V177644 
8200 925002 000241 CLC ;V177646 
1 000137 025030 JMP QONTPBOS ;V177650 
8202 10 016004 177776 MOV -2(RO),R4 :V177654 
8203 14 103402 BCS 2$ ;V177660 
8204 16 04 CHP R2,R4 ;V177662 
8205 025020 001401 BEQ 3$ :V177664 
925022 04432 2$: PERRO4 ;V177666 
$307 4 077115 3$: S08 R1,1$ ;V177670 
3208 025026 7 RETURN ;V177672 
6210 025030 MTPBO4: SUBTST <<MTPBO4 SUBR ROTATING BIT>> 
| SAHEAEESEEESEAERARERESEEAEAEEEEEESSEEESERESEESSSESASESESESESESESESESEDESESSEEEESSESES 
; #SUBTEST MTPBO4 SUBR ROTATING BIT 
| PRSEASERESHERSASSRESESASESEAAEESEEERESEASESEESESESESESESEAESESESESESEHESESESESSEEESS 
6211 025030 106110 i$: ROLB = CRO) :V172360 
8212 025032 077502 S08 5.1% :V172362 
6213 025034 106120 ROLB (RO) ;V172364 
8214 025036 106110 2$: ROLB (RO) 72 
8215 025040 077402 S08 R428 :V172370 
8216 025042 106120 ROLB (RO) :V172372 
6217 025044 000137 025010 JMP BOMTPA04 +14 3V172374 
6219 025050 MTPOOS: SUBTST <<MTPOOS ROTATION ONES TEST>> 
§ SERARASESHSSSASESSAKESSAASSASSASEREAERARESSESESESELESSESESESESESESESESSESESSEESSEESE 
; SUBTEST MTPOOS ROTATION ONES TEST 
s RAAERSEAASASAASERESSESESSEASSASESEESSESEASSESAASSESSESASEESSESESESESASSSESESESESESESSSSSEEE 
8220 025050 012705 000010 i$: MOV 08. ,R5 ;V177640 
8221 925054 010504 MOV RS5,R4 ;V177644 
000261 SEC ;V177646 
8223 025060 000137 025030 JMP QeMTPBO4 ;V177650 
e224 016004 177776 MOV -2(RO),R4 ;V177654 
5 025070 103002 Bcc 2$ ;V177660 IF THIS HAPPENS THE GOOD & BAD MATCH 
8226 020204 R2,R4 ;V177662 
8227 025074 001401 BEQ 3$ ;V177664 
8228 025076 1044 2$: PERRO4 ;V177666 
8229 02 100 077115 3$: SOB R1i,1$ :V177670 
8230 025102 2 RETURN ;V177672 


— a 


CVMJABO MSV11-J MEMORY DIAG. 
MTPOOS ROTATION ONES TEST 
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002242 


SEQ 0209 


MTPOO6: SUBTST <<MTPO06 INITIAL DATA TEST>> 
| PROESESEEESESESEEEESESEESESEEESEEEESSEEEESESEEEERESSEESEEE ESSERE SESESEEEEEEEESES 


; SUBTEST MTPOO6 INITIAL DATA TEST 
| CRRROAEEAEESESESESEEESEESESEEESERESERSSESSEESRESERESESEAERESESESEEESSEEESEEEEEEES 


; THIS TEST CHECKS THE DI/D0 LINES BY 
SHIFTING Ai T 


; HROUGH THE WORD. 
MOV #1, DATBUF ;SET THE FIRST TEST BIT 
CLR DATBUF +2 ;CLEAR 2ND WORD 
1s: MOV DATBUF , @C(R1) ;WRITE TEST WORD 1 
MOV DATBUF +2.,82(R1) ;AND TEST WORD 2 
CMP DATBUF ,R2 ;NOW READ THEM 
BEQ 2$ ;BR IF FIRST 16 OK 
PERRO? ;ERROR TRAP 
2$: MOV @2(R1).R2 
chp DATBUF +2,R2 ;NOW READ SECOND WORD 
; 
PERR1O ;ERROR TRAP 
3$: TST DATBUF +2 ;sHAS LAST BIT BEEN TESTED ? 
BMI 4$ ;MINUS MEANS BIT 31 
DLEFT DATBUF ;NO, SHIFT TEST BIT LEFT 
ROL DATBUF 
ROL DATBUF +2 
DSABL CRF 
BR i$ ;GO WRITE NEW TEST DATA 
;NOW GOING TO SHIFT A O IN DATA DIRECTION 
4s: MOV #177776,DATBUF ;PUT A 0 IN BIT O 
MOV @-1, DATBUF+2 =; 1'S IN ALL OTHERS 
S$: MOV DATBUF ,@C(R1) ;WRITE THE DATA 
MOV DATBUF+2,82(R1) ;2 WORDS WORTH 
MOV acRi),R 
CMP DATBUF ,R2 ;NOW READ FIRST WORD 
BEQ 6$ ;BR IF OK 
PERRO? 
6%: MOV @2(R1),R2 
CMP DATBUF +2,R2 ;NOW, READ SECOND WORD 
BEQ 7$ ;BR IF OK 
PERR1O 
7$: TST DATBUF +2 ; TESTED BIT 31 YET? 
BPL 8$ ;2R IF YES, WE'RE DONE 
DLEFT  DATBUF 
OL DATBUF 
DATBUF +2 
.DSABL CRF 
S$ ;KEEP GOING 
8$: RETURN 


.—- — ee ee 
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MTPOO7: SUBTST <<MTPOO7 ADDRESS BIT TEST>> 
3 SEEAAESESAEESEESESESEARESESEEAESEEREEESEEEEEEEEEEEEEEEERESEEDEEESOREDEDES 22246484 
; *SUBTEST MTPOO7 ADDRESS BIT TEST 
3 secasessocenessesenqneneee a ts an tat ne 
; THIS TEST CHECKS TO SEE THAT EACH ADDRESS 
: BIT IN EACH 16K 3ANK CAN BE ASSERTED UNIQUELY. 
; IT CHECKS FOR ADDRESS BITS THAT MAY BE STUCK 
See HIGH, STUCK LOW OR STUCK TOGETHER. 
TSTB ; ;READ AND COMPARE FOR ZEROS 
BEQ 1$ ;BR IF OK 
PERRi1 
1s: come =s« R11) ;COMPLEMENT THE BYTE 
MOVB (R1),RO 
TSTB =. RO ;READ FOR NON ZEROS 
2$ :BR IF OK 
PERR12 
2%: BIC R2,R1 ;MASK OFF THE ASSERTED BIT 
ASL R2 ‘SHIFT R2 FOR NEXT BI 
BIS R2.R1 ;SET THE NEW BIT INTO R1 
MOV (Ri), RO 
TST RO ;READ THE NEW ADDRESS 
Q 3$ ;READ FOR ZEROS 
PERR13 
3$: COM CR1) ;COMPL THE WORD 
MOV (R1),RO 
TST RO ;READ IT AGAIN 
PERR14 
CMP #10000 ,R2 ;CHECK FOR MSB IN 4K BANK 
BNE 2$ ;NOT LAST BIT, BRANCH 
HOV #160000,R1 
S$: RETURN 


SEQ 0210 


LL LLL 


——— oe + 
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DIAG 
MTPOO7 ADDRESS BIT TEST 





SEQ 0211 


6316 C25404 


MTPO10: SUBTST <<MTPO10 BYTE ADDRESSING TEST>> 
| CRRESSEEESERESEERSEAEAESEEESEEESESESASESESESESEESESEEEEEESSESESESSESEREESESDEEEEES 


;*SUBTEST MTPO10 BYTE ADDRESSING TEST 


3 —————w 2° << -.¥--“¥- 1” ee S£664464640464606866 


6317 ;TEST 3 THIS TEST CHECKS FOR PROPE 
6316 ; BYT ADDRESSING WITH ECC DISABLED 
8319 025404 010402 MOV R4,R2 4 HAS LOWEST ADORESS 
a 010403 MOV R4,R3 ‘PUT IT IN R3 ALSO 
A 10 962702 000004 ADD 04 ,.R2 ;POINT R2 TO LAST BYTE +1 
4 44 012713 177777 MOV @-1,(R3) ;WRITE ALL ONES 
6 012763 177777 000002 MOV @-1.2(R3) ‘THE 4 TEST BYTES” 
8324 0 008013 i$ CLRB CR3) ;CLEAR A BYTE 
6 010401 MOV R4,R1 ‘INITIALIZE Ri FOR EACH PASS 
6 020201 24: CMP R2,.R1 ;IF EQUAL, JUST READ LAST BYTE 
001420 BEQ 6$ ;BR IF EQUAL 
6328 020301 CMP R3,R1 ;1S THIS THE BYTE OF ZEROS 
4 001007 BNE 43 ;8R IF NOT 
& 2 111100 MOVB (R1).R 
8 ;WARNING IF tou OPTOMIZE CHANGE THE PCBUMP FOR THIS ERROR INCASE OF TRAPS 
025444 ©22700 000000 CMP #0,RO ;IT IS, COMPARE FOR ZEROS 
8333 0 30 00140 BEQ 
H 4 0 10443 PERR11 
tts. 54 00520 3$: INC Ri ;NEXT BYTE 
33 56 7 BR ; RETURN 
38 111100 as MOVB  (R1),RO 
3 122700 177777 CMPB —s«@-11 RO ;ITS NOT THE BYTE OF 0’S, READ 1'S 
001401 BEQ 5$ 
8 025470 104436 PERR12 
8343 025472 005201 S$ INC Ri ;MOVE TO NEXT BYTE 
8 74 000 BR 
8345 7% 112713 177777 6$ MOVB @-1,(R3) ;RESTORE 1'S TO BYTE yUST TESTED 
8 0 302 00520 INC R3 ;INC TO NEXT BYTE 
0 020302 CMP R3,R2 “WAS THAT JUST THE LAST ONE? 
a 8 025506 001347 BNE i$ :BR IF NO 
8549 025510 00020 RETURN 
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002076 
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MTPO14: SUBTST <<MTPO14 


oe a ee ee” 


BASIC DOUBLE BIT ERROR TEST>> 


| PEORERESEEEESEESERESEESEESSSESESSSESESEESEEAESESESSSERSSSSSEEEESAEDEEAEEEEDDESS 


;*SUBTEST 


MTPO14 BASIC DOUBLE BIT ERROR TEST 


§ SERSEESSEEEEE FS CEEEEESSESSESAESEESESESSSSESASSESEASSEESESSASSESESSEESESE SESE SEEEES 


é 

; A BYTE WRITE 

; WILL BE ABOTRED. 

; CACHOFF 
LET PARCNT := #0 
LET NOPAR := 01 
LET ADDRESS := @FIRST 
CBREG 
LET CSR := 03145 
LOADCSR 
LET GOOD := #103145 
LET (R1) := 00 


TST CR1) 
IF PARCNT NE #1 


ERROR +55 
END 


READCSR 
BIC @#BIT13.CSR 
IF CSR NE NE GOOD THEN 
SET HEADER 
LET BAD := CSR 
ERROR +65 
ND 


ECC1iINIT 
CLR PASSNO 


ECCiIINIT 

INC PASS 

CLR PARCNT 

LET (R1) :B= 0377 
TSTB CRi) 

IF PARCNT NE @1 


SET HEADER 


THIS TEST CHECKS THAT A DOUBLE ERROR By BE » cahiecshiea 
WITH A DOUBLE ERROR ON A MSV11-P 


;TURN OFF CACHE 
CLEAR PARCNT 


;SET PARITY ACTION 
MOV @1,NOPAR 
;SET ADDRESS FOR ERROR REPORT 
V @FIRST, ADDRESS 


sENABLE CHECK/SYNDROME BIT REGISTER 
;DBE CHECK BITS FOR CSR 
MOV @3145.CSR 


; WRITE a CHECK BITS TO CSR 
sGO0D DAT 


MOV #103145 ,G00D 
;WRITE ZEROS AND DBL ERROR CHK we ot 
;READ A=0 TO GET DOUBLE BIT ERROR 
;WAS BUSPBL ASSERTED??7?? 


CLR PARCNT 


= 
@ 


CMP PARCNT,@1 
BE@ L211 
;ERROR CALL ;;MISSED EXPECTED TRAP 
; 


L211: 
;READ CSR FOR CORRECT CHECK BITS AND DBE INDICATOR 
‘CLEAR INHIBIT MODE POINTER FROM DATA IF IT EXSISTS1 
‘CHECK IF DOUBLE ERROR BIT IS SET 

CMP CSR. 

BEQ L212 

MOV #-1, HEADER 

MOV CSR.BAD 


; 
;BAD DATA 


;ENABLE BUSPBL 
;CLEAR LOOP COUNTER 
i 


;ENABLE BUSPBL 


s INCREMENT LOOP COUNTER 
;CLEAR PARITY ACTION COUNTER 
;WRITE BYTE SHOULD BE ABORTED 
MOVB @377,(R1) 


sREAD R1 TO SEE IF IT IS STILL O 
;WAS WRITE ABORTED??? 
CMP ——* 1 


BEQ@ L215 


L2le2:ssssss 


BSOsisssss 


SEQ 9212 


a + ~~ - 
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012737 177777 002612 
005037 002044 

012737 000377 002052 
104056 


023727 002266 000002 
001346 


37 002072 





: 
: 
S 


LET GOOD := #0 
LET BAD := 0377 
ERROR +56 

END 


INC Ri 
UNTIL PASSNO EQ #2 


CLR -C(R1) 
CLRiC 

CLR PARCNT 
CACHON 

RETURN 
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MOV @-1,HEADER 
CLR GOOD 
MOV @377,.BAD 


;GO0D DATA 
;BAD DATA 
3 
3 
L2i3:ssssss 


;AND REPEAT ON HIGH BYTE 
; 


CMP PASSNO, @2 
BNE B30 
ESO:ssssss 
;CLEAR LUT 
;CLEAR CSR 


;CLEAR PARITY TRAP COUNTER 
;TURN ON CACHE 
; 


SEQ 0215 
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160000 
000377 


MTPO17: SUBTST 
{ MPPPhSSSAASESESSERESEESSDSESSRESSERESSEEESESSESEEEEESESEEESEDESEEEESEESESEEEESS 


MTPO17 HOLDING 1'S € 0’S TEST 


;#SUBTEST 





<<MTPO17 
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eee AT RTT ERROR TEST . _ SEQ 0214 


HOLDING 1’'S € 0'S TEST>> 


3 meer Mme << xX COE kOe KE eC 


1$: 


2s: 


3$: 


:#(€1) 


OF 
OF 


@FIRST,R1 
R1,R4 
@LAST+2,R5 
#377,RO 
RO,RS 

RS 
RO,CR1I)+ 
R3,CR1)+ 
R1,RS 


-CR1),R2] 
RO.R2 


3$ 


THIS TEST CHECKS THE MEMORY FOR THE CAPABILITY 
HOLDING 1‘S AND O'S BY WRITING A BACKGROUND 


000377 AND READING IT 
MEMORY IS WRITTEN USING A BYTE AT A TIME 
STEPS 1 & 2 ARE REP 
THIS TEST WRITES BYTES & READS 


EATED WITH A SWAPPED BACKGROUND PATTERN 
WORDS 


ee 


:;GET THE PATTERN INTO RO 


prot SL A BYTE 

;WRITE THE MEMORY WITH THE BYTE STORED IN BAKPAT+1 
;COMPARE TEST LOC TO TOP «+ 2 

;BRANCH IF LOWER 


;TEST THE MEMORY TO SEE od IT CONTAINS 
;THE WORD STORED IN BAKPAT 


;KEEP ON TESTING THE MEMORY UNTIL 
:R1 EQUALS THE LOWEST Ss 
;CHANGE THE DATA PATTERN 


;IF THE DATA PATTERN DOES NOT HAVE LOW 
; BYTE =O THEN FALL THRU 


——— ae ee 
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DIAG. 
MTPO1L7 HOLDING 1'°S &€ O'S TEST SEQ 0215 
86437 026014 MTPO2O0: SUBTST <<MTPO20 SYNDROMES TO CSR ON SINGLE BIT ERROR TEST>> 
[Meesesessasssaasssssssssscossssasacssesscessnssssssssesasssssonscscssesesesasecs 
3; *SUBTEST MTPO20 SYNDROMES TO CSR ON SINGLE BIT ERROR TES 
—_ oo ~  .  T  B BAK Fe ore Ri OO 
; 
8439 ; THIS TEST CHECKS TO SEE IF THE SINGLE BIT ERRORS CAUSE THE SBE 
8440 ; BIT IN THE CSR TO BE SET AND CORRECT SYNDROME BITS ARE GENERATED FOR 
8441 ; ALL 16 DATA BITS. 
8442 ; 
8443 026014 104424 CACHOFF ; TURN OFF CACHE 
8444 026016 CLR RO CLEAR tt. 
8445 026020 105037 002264 CLRB PASFLG ;CLEAR P ASFLG 
ot 026024 104515 G ;ENABLE CHECK/SYNDROME BIT REGISTER 
8447 026026 REPEAT : 
Sty Counter’ ' 
8448 LET PASFLG :B= PASFLG «+ 41 ; INCREMENT LOOP C 
105237 002264 INCB PASFLG 
8449 0260 LET R44 := @-1 s INDEX TO SINGLE BIT ERROR TABLE 
026032 012704 177777 MOV @-1,R4 
8450 026036 LET BITNO := #0 ;CLEAR INNER LOOP COUNTER 
026036 005037 002324 BITNO 
8451 026042 IFB PASFLG EQ #1 ;SELECT DATA TO BE CORRECTED BY PASSNO 
026042 123727 002264 000001 CMPB PASFLG,¢1 
pret 001003 BNE L215 
8452 LET RS := @1 ;DATA=0;BIT TO BE CORRECTED IS A ONE 
026052 012705 000001 MOV @1,.R5 
8453 026056 ELSE ; 
026056 000402 BR L216 
026060 L215:sssss 
8454 026060 LET RS := #177776 ;DATA=177776;B81IT TO BE C CTED IS A ZERO 
026060 012705 177776 MOV #177776,.R5 
8455 026064 END : 
026064 L216:sssssi 
8456 026064 REPEAT ; 
026064 B32:isssse 
8457 026064 005237 002324 INC SITNO ; INCREMENT BIT POINTER 
8458 026070 LET R4 := R4 + G1 sPOINT TO NEXT SET OF CHECK BITS 
026070 005204 INC R4 
6459 026072 LET R2 :B= PTABLECR4) sGET NEXT SET OF CHECK BITS 
026072 pe rae | 030164 MOVB PTABLECR4),.R2 
026076 072227 000005 ASH #5,R2 :;SHIFT TO LINE UP IN CSR 
8461 026102 052702 000004 BIS #6IT2.R2 ; ENABLE 
8462 026106 LET CSR := R2 ;GET CHECK BITS TO BE WRITTEN 
0261 010237 002150 MOV R2.CSR 
8463 026112 104425 LOADCSR ;LOAD CSR WITH DATA 
8464 026114 LET CRI) := RO ‘WRITE DATA TO TEST ADDRESS 
026114 010011 MOV RO.CK1) 
8465 026116 10450 CLRiICSR :;CLEAR CSR 
026120 005711 TST CR1) ;sCORRECT SBE 
6467 026122 1044 READCSR ;READ CSR FOR CORRECT SBE BIT AND SYNDROMES 
026124 042737 177757 002150 BIC #tC20.CSR ‘CLEAR ALL BU INDICATOR 
9 026132 IF CSR NE 620 ;WAS DATA C ry 
026132 023727 002150 000020 CMP C 
026140 001407 BEQ ey 
8470 026142 LET GOOD := #20 : 
02614 012737 000020 002044 MOV #20,G00D 
8471 026150 LET BAD := CSR 3 





—_——_ — 
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| HTPOSO SYNDROMES TO CSR ON SINGLE BIT ERROR TEST SEQ@ 0216 
026150 013737 002150 002052 MOV CSR.BAD 
6472 026156 104060 ERROR +60 ;NO ERROR 
8473 026160 END 3 
| 026160 L217: ‘ke i 
8474 026160 104514 SYNREG s ENABLE SYNOROME BI SIT REGISTER 
) 6475 026162 1044 READCSR ;GET SYNDROMES F 
8476 026164 042737 174033 002150 BIC #tC3744,CSR ;MASK SYNDROME airs 
86477 026172 LET R3 :B= SBESYNCR4) :GET GOOD SYNDROME 
026172 116403 026310 MOVB SBESYNC(CR4) RS 
8478 026176 072327 000005 ASH @5,R3 ;SHIFT INTO POSITION 
8479 026202 052703 000004 BIS #B8IT2,R3 ;SET DIAG MODE IN DATA 
IF R3 NE CSR ‘DO SYNDROME BITS AGREE 
020337 002150 CMP R3.CSR 
026212 001411 BEQ@ L220 
6481 026214 SET HEADER ; 
026214 012737 177777 002612 MOV #-1,HEADER 
8462 026222 LET GOOD := R3 : 
026222 010337 002044 MOV R3.GO0D 
8483 026226 LET BAD := CSR ; 
026226 C1i3737 002150 002052 MOV CSR,.BAD 
8484 026234 104042 ERROR +42 3 
8485 026236 END ; 
026236 L220: ssis53 
8486 026236 005011 CLR (Ri) ;CLEAR 
8487 026240 IFB PASFLG EQ #41 ; SHIFT DATA DEPENDING ON PASFLG 
026240 123727 002264 000001 CMPB PASFLG,@1 
026246 001002 BNE L221 
8488 026250 0063505 ASL RS ;SHIFT BITNG TO THE LEFT 
84869 peril ELSE ; 
000402 BR L222 
026254 L221 esses es 
8490 oeeese 000261 SEC ;SET CARRY BIT AND...... 
8491 006105 ROL RS sROTATE LEFT © 
8492 026260 ; END i 
L222:555335 
8493 oseeee UNTIL BITNO EQ #16. ;UNTIL ALL BITS ARE DONE 
023727 002324 000020 CMP BITNO, 16. 
001276 BNE B32 
70 ES2:ss55335 
8494 026270 005100 COM RO ;COMPLEMENT DATA AND REPEAT 
8495 026272 UNTILB PASFLG EQ @2 ;UNTIL 2 PASSES ARE COMPLETE! 
72 123727 002264 000002 CMHPB PASFLG, @2 
001252 BNE B31 
026302 ESil:sssess 
8496 302 104503 CLRICSR ;CLEAR CSR 
3497 304 104423 CACHON ; TURN CACHE 
Sas 306 000207 RETURN 
: 
- : 3 MSV11-P SINGLE BIT ERROR SYNDROME BIT TABLE 
; 
8 026310 016 013 023 SBESYN: .BYTE 16.13,23,25.26,31,32,34,43,45,46,51,.52.54,61.64 
026313 025 026 031 
026316 032 034 043 
026321 04 051 
026324 052 054 1 


8503 
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CVMJABO MSV11- 
MTPO20 SYNOROMES TO CSR ON SINGLE BIT ERROR TEST 


8505 0263550 MTPA21: 


SUBTST <<MTPA21 


CHING 1‘'S & O'S PATTERN TEST>> 


MAR 
eer ey.  rnccccneenccnanes 
MTPA21 MARCHING 1 


;*SUBTEST 


'S € O'S PATTERN TEST 


3 r= NT et Be cm Me Be Bi Rin Pee Back on Re AITO OOOO OO 6020464466646646 


1%: 


2s: 


MTPB21: 
1%: 


2s: 


MTPC21: 
1$: 








a. » BYTESWAP -MODIF Y ,READ . DOWN 


-(R1),RO;V177640 
R2.RO 7642 


SWAB CR1) 3V177650 
MOV (R1),RO ;V177652 
CMP R3,RO 7654 


:V17 
BEQ 3V177656 
PERR2O ;V177660 
CMP R4,R1 3V177662 
BNE is 3;V177664 
RETURN 3;V177666 


aa etd wy Oe READ , UP 


(R1),RO ;V177640 

3. :V177642 

BEQ 2s 3V177644 
PERR2O 3V177646 
SWAB CR1) :;V177650 
MOV CR1),RO :V177652 
CMP R2.RO ;V177654 
BEQ 3$ 3V177656 
PERR17 ;V177660 
ADD #2,R1 ;V177662 
CMP RS,R1 ;Vi77666 
3V177670 

RETURN 3V177672 


;READ.BYTESWAP -MODIFY ,READ, UP 
MOV CR1),RO ;V177640 
2 . Vv V¥177642 


BEQ 2$ 3V¥177644 
PERR17 3V¥177646 
SWAB CR1) :V¥177650 
MOV CR1),.RO ;V177652 
CMP R3,RO 3V177654 
BEQ 3$ 3V177656 
PERR2O 3V177660 
AOD #2,R1 3V¥177662 
CMP R5,R1 ;V177666 
BNE 3¥177670 
RETURN :V177672 


; DONE? 
;NO - LOOP 
;YES - RETURN 


; DONE? 
sNO - LOOP 
;YES - RETURN 


; DONE? 
;NO - LOOP 
;YES - RETURN 


SEQ 0217 


scene 





rr ee ee Se 
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_MTPA21 I'S & 0'S PATTERN TEST - SEQ 0218 





6557 50 MTPD21: ;READ.BYTESWAP-MODIFY.READ.DOWN 
r+ pt os 498 1%: MOV -(R1), ROiV177640 
3,R0 V177642 
- ¢ oesass 2 v177644 
3V177646 


23: 


011100 
sit PERRIT ~—«SA.77660 
001365 


qa Eg 





2 3%: CMP R4,R1 ;:V177662 ; DONE? 
ie) 74 BNE ;V177664 ;NO - LOOP 
a 76 000207 RETURN ;V177666 ;YES - RETURN 


CVMJABO MSV11-J MEMORY D 
MTPA21 MARCHING 1'S E 


8575 026500 


6377 





8504 ¢ 
6595 26; 
5% ¢ 


e597 ¢ 


, 
6596 ¢ 
’ 





8599 ¢ 
, 


000010 
012737 


001005 


013702 
013703 
000404 


013702 
013703 


005037 


104423 
013737 
012701 
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0’S PATTERN TEST _ 
MTPO22: SUBTST <<MTPO22 REFRESH € SHIFTING DIAGONAL TEST>> 
| SOESEEESESEEESSSEESSESESSEESSEEEEEESESESESEESESSSESEESSEDESSESESESESESSSESESEES 
3; *@SUBTEST SH € SHIFTING DIAGONAL TEST 
| OOSRSSEESESEESEESESEESESESESSSSEREEEEEES* * +44 LERRESEESEASSEESSOSESEEEEEEEESESES 
3€1) WE WRITE A DIAGONAL PATTERN IN Y CACHE ON). 
3€2) IF A REFRESH TEST WE DISTURB ALL ROWS FOR > 2 MS CWITH CACHE ON). 
3€3) WE READ & CHECK FOR CORRECTNESS THE DIAGONAL PATTERN 
$ (WITH CACHE OFF). 
KDIAG=-8. s;HOW OFTEN A DIAGONAL STRIPE OCCURS (MUST BE A POWER OF 2) 
FOR EVEN := @1 TO #2 3FOR DATA € COMPLEMENT DATA 
000001 002364 MOV #1.,EVEN 
BSS:isssss 
IF EVEN EQ #1 
002364 000001 CMP EVEN, #1 
BNE L225 
LET R2 := ZEROS 
002336 MOV ZEROS .R2 
LET R3 := ONES 
002614 MOV ONES.RS 
ELSE 
L225 = 
2358883 
LET R2 := ONES 
002614 MOV ONES .R2 
LET R3 := ZEROS 
002336 MOV ZEROS,.RS 
END ;OF IF EVEN _— 
2333883 
FOR STRIPES := @0 TO @KDIAG-1 ;FOR THE NUMBER OF STRIPES 
002366 CLR STRIPES 
BS4:ssssss 
WRITE LOOP 
;TURN CACHE ON 
_ LET COUNT := STRIPES — 
002366 002 V » COUNT 
LET RL := SFIRST 
060000 MOV @FIRST.R1I 
WHILE Ri LOS @LAST 
BS5S:ssssss 
157776 CMP R1,.@LAST 
BHI L227 
IF COUNT LT @0 THEN LET COUNT := @KDIAG-1 
002370 TST COUNT 
000007 002370 MOV @KDIAG-1,COUNT 
L230: ssse33 
IF #374 OFF.IN Ri THEN LET COUNT := COUNT - @1 
0v0374 BIT tgp 
002370 DEC 
L2Slssssiss 
IF COUNT NE #0 
002370 


TST COUNT 
BEQ L252 


LET CRI) := R2 


MOV R2,.CR1) 


SE@ 0219 


— 
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SH & SHIFTING DIAGONAL TEST —_ 


LET 2CR1) := R2 





MOV R2.2CR1) 
ELSE 
BR L255 
L23S2:isssas 
LET CR1) := RS 
MOV RS.CR1) 
LET 2CR1) := RS 
MOV RS,.2CR1) 
END ;OF IF COUNT 
L233:sasaes 
LET COUNT := COUNT - #1 
DEC COUNT 
LET R1 := Ri + 4 
ADD #4,R1 
END ;OF WHILE 
BR B35 
L227: issass 
ESS:ssssss 
;END OF WRITE LOOP 
IF DIAGFLAG IS FALSE THEN $CALL REFRESH 
po 5 pt Hd 002004 TST OIAGFLAG 
BNE L234 
' 027054 JSR PC REFRESH 
L234:sssees 
rete sREAD LOOP 
LET COUNT := STRIPES 
013737 002366 002370 MOV STRIPES.COUNT 
one 1 012701 060000 saan ead MOV @F IRST.R1 
6614 7 tty CACHOFF 3; TURN CACHE OFF 


—<— 


O22 REFRESH 
8616 026700 
700 


04 
8617 706 
06 


010 

8637 027010 
027010 
8638 027010 
027010 
8639 027014 


Cyniese MSV11-J MEMORY 


€ SHIF 


020127 
101046 


005737 
002003 
012737 


005737 
001412 
011100 


020200 
001401 
104443 


016100 


020300 
001401 
104444 


905337 


DIAG. 
TING DIAGONAL TE 


157776 


002370 


002370 


MACRO 


002370 
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WHILE R1 LOS @LAST 


IF COUNT LT #0 THEN LET COUNT := @KDIAG-1 


IF #374 OFF.IN R1 THEN LET COUNT 


IF COUNT NE #0 


LET RO := CR1) 
IF R2 NE RO 
END sOF IF R2 
LET RO := 2(R1) 
IF R2 NE RO 


PERR17 
END ;OF IF Re 
ELSE 


LET RO := CR1) 
IF R3 NE RO 
END sOF IF R3 
LET RO := 2(R1) 
IF R3 NE RO 


END ;0F IF R3 
END ;OF IF COUNT 
LET COUNT := COUNT - #1 
LET Ri := Ri + 04 


eee ee 


B36: 
FEPT ROP R1.OLAST 
BHI L235 


TST COUNT 
BGE L236 
@KDIAG-1,COUNT 


< 


MO 
L236:sisase 
- 1 

BIT @#374,R1 

L237 
COUNT 


o 


DE 
L237:ssssas 


TST COUNT 
BEQ L240 


MOV CR1),RO 

CMP R2,.RO 

BE@ L241 
L241l:issssss 

MOV 2(€R1),RO 

CMP R2,RO 

BE@ L242 
L242: iscsi 


BR L243 
L240: siseee 


MOV CR1),R0 
L244:isseci 

MOV 2(R1),RO 

ste tas” 
Lo4s:ssssse 
L243S:ssssss 

DEC COUNT 


ne ee 
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MTPO22 REFRESH € SHIFTING DIAGONAL TEST SEQ C222 
027014 062701 000004 ADD 64,R1 
8640 027020 END ;OF WHILE 
7020 000727 BR B36 
027022 L23S:ssssse 
027022 ES6:ssssas 
et ;END OF READ LOOP 
6643 027022 END ;OF FOR STRIPES 
027022 005237 002366 INC STRIPES 
oe eas 023727 002366 000007 CMP STRIPES, OKDIAG-1 
0270 003643 B34 
027036 ES4:sssssss 
8644 027036 END ;OF FOR EVEN 
027036 9052 002364 NC EVEN 
027042 023727 002364 000002 CMP EVEN, ¢2 
027050 00361 BLE 633 
027052 ESSssssssss 
6645 027052 000207 RETURN 
8647 027054 REFRESH:SUBTST <<SUBR REFRESH DELAY>> 
Seem aur ean nme eeenaaenceanenmenenaaes 
;*SUBTEST UBR REFRESH DELAY 
ww ~~ ~y 4" en oy hp eeaar nce eenaraemes 
peers EACH ROW FOR > 3.2 MS 
8649 y+ IAS 94 FOR RO := @#FIRST TO @FIRST +374 BY 44 
027 012700 060000 MOV @FIRST,RO 
027 B3s7sssssss 
8650 027060 004737 027124 CALL REFSUB 
8651 027064 ND ;OF FOR RO 
027 062700 000004 ADD #4,R0 
027070 O 060374 CMP RO, @FIRST+374 
027074 003771 BLE 837 
02707 ES7ssssseas 
8652 027076 LET RO := OFIRST+BIT14 
0270 012700 120000 MOV @FIRST+BIT14,R0O 
8653 027102 WHILE RO LOS @LAST+BIT14+374 
027102 B40:ssiias 
027102 20027 020372 CMP RO, @LAST+BIT14+374 
0271 101005 BHI L246 
8654 027110 004737 027124 CALL REFSUB 
6655 027114 LET RO := RO + 04 
027114 062700 000004 ADD #4,R0 
8656 027120 END ;OF WHILE 
027120 000770 BR B40 
os ites - LOSS sense 
2388383 
8657 osvise RETURN 
ote: 0271 012704 000640 REFSUB: MOV 0640 ,R4 ;TIME FOR A > 3.2 MS LOOP 
8659 0271 062700 0ov0002 ADD @2,R0 
8660 027134 140 1s: COM -CRO) 
6661 027136 120 COM CRO)+ 
aeee 027140 110 COM CRO) 
8663 027142 00511 COM CRO) 
8664 0271 077405 SOB R4.1$% 
8665 027146 1627 000002 SUB #2,R0 
8666 027152 000207 RETURN 


EL LL LLL 


CVMJABO MSV11-J MEMORY DIAG. 
SUBR REFRESH DELAY 


8669 027154 


8670 
8671 
867 
667 
8674 
| 6675 
8676 


8705 027174 062702 000400 
06 027200 


09 027204 062701 000002 
8710 027210 000137 027214 
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MTPA24: SUBTST 
| SREEEEAEEESEEEEESESESEREEERESESAERESEESREESESESESESEEESESESESESSSESEEEEESESEEEEEES 


s*SUBTEST 
| RARROSAEASEAEAEESEERESESESESLESEEAERESESEDSERESEDESEESESEEEESSSEEEESSSEESEESESEDSS 


1$: 


2$: 


3$: 


<<MTPA24 


SE@ Oces 
FAST GALLOPING PATTERN TEST>> 
MTPA24 FAST GALLOPING PATTERN TEST 


NCLUDING SETUP) IS AS FOLLOWS 
E Y WITH A BACK GROUND PATTERN 


AKPAT 
T LOCATION BEING TESTED 
OE gD THE ROW/COLUMN UNDER TEST AS ‘B’. 


CADDS 64 DOUBLE WORDS TO ‘B‘) 
pe RN AND 6 UNTIL ‘B’ IS GREATER THAN THE 


Ae? 
STEPS 3-8 UNTILL ‘A' REACHES THE END OF THE BANK 
DATA IS COMPLEMENTED 


;BR IF OK 
;sREPORT ERROR 
;sREAD ‘B’ 
;CHECK ‘B’ 
;8R IF OK 
;sREPORT ERROR 
;BUMP ‘B’ 

;AT END YET? 
;B8R IF NO 


A’ 


;THE TOTAL TEST CI 

3#€1) THIS TEST S THE MEMOR 
3% STORE ON 8B 
3#(€2) TEST BEGINS AT LOWES 

pe CLETS NAME IT 'A‘) 

3#(3) LETS NAME THE 1ST LOC 
3#(4) SWAPS BYTES FOR LOCATION 
7#(€5) READS ‘A‘, READS ‘B' 
3*#(€6) ‘B' = 'B' +400 

3#(7) 

7#(8) 

7#(9) REPEATS 

3#(€10) AFTER EXECUTING THE TEST 
+e AND STEPS 1-9 ARE REPEATED 
;sREGISTERS ARE USED AS FOLLOWS 
RO TEST DATA 

7R1 ‘A’ 

:R2 ‘B' 

:R3 BAKPAT 

3R4 SWAPAT 

;R5 LAST 

;sNOTE THE PATTERN STARTS AT MTPB24!ittirtsrsssess 
;UIPAR'S 

MOV CR1),RO 3V177640 
CMP RO,R4 3V¥177642 
BEQ 3;V177644 
PERR23 :V177646 
MOV CR2),RO ;V¥177650 
CMP RO,.RS ;V1776S2 
BEQ 3$ 3V177654 
PERR24 3V177656 
ADD #400 ,R2 ;V¥177660 
CMP R2,R5 3V177664 
BLOS i$ 3V177666 
ADD #2,R1 :V177670 
JMP BOMTPB24 3V177674 


;BUMP ‘ 
:GOTO V177260 


= ome oe eee ee 


CVMJABO MSV11-J MEMORY DIAG 


MTPA24 FAST GALLOP 


8713 027214 
| 86714 
6715 027214 
| 8716 027216 
717 027220 


8717 02 
8718 027222 
8719 027224 


| 8721 027230 
87 
8723 027250 
8724 027232 
LE 4 ps ILE 


8727 240 
8728 027242 
8729 


000 
000137 0272350 


010102 
011100 
020004 
€01401 
104447 
000137 027174 





, MACRO 
ING PATTERN TEST 


oe ot” 
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MTPB24: SUBTST <<MTPB24 FAST GALLOP PART 6>> 
| SOREREESEESESEESESEESESESEREEEEEEESEEEEEESESESESESEREESEEESESEEESSESEASEEESEEESS 


; *SUBTEST MTPB24 FAST GALLOP PART B 
ceiiecits §=—=«««(gunt amps ohne ec ceeee nmmanenanmmnennnmmananes 
3 ‘ 
MOV R4,CR1) 3V¥172260 ;sWRITE ‘A’ 
CMP R1,R5 3V172262 ;DONE? 
BNE i$ 3V172264 ;8R IF NO 
RETURN ;V172266 ;YES - RETURN 
i$: JMP BeMTPC24 3V¥172270 ;GOTO V172360 


MTPC24: SUBTST <<MTPC24 FAST GALLOP PART C>> 
| RARRAEREREAEERESERESERERELEEEEESEEEEEEEEEEEEEESERESEEEEEESESESESESEEESESESSEDES 


;*SUBTEST MTPC24 FAST GALLOP PART C 
mane == (iihitcamemamcana ncn eee enter amen a ree eameaanenneemnnananaes 
3K . 
MOV R1,R2 3V¥172360 ;sRESET ‘B’' <--- ‘A’ 
MOV CR1),RO 3V172362 ;READ ‘A’ 
CMP RO,R4 :V172364 ;CHECK ‘A’ 
BEQ i$ 3V172366 ; F 
PERR23 ;V¥172370 ;REPORT ERROR 
18%: JMP @OMTPA24 +20 ;V1i72372 ;GOTO V177660 


SEQ 0224 
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MTPC24 FAST GALLOP PART C SEQ 0225 


8732 027246 MTPA26: SUBTST <<MTPA26 RANDOM DATA CWRITE)>> 
| CREREEEEEAEEESERERESESEESESSESERESESERERESEESSSESEESEEEEEEEESESSEESESESEEEEEEES 
;*SUBTEST PA26 RANDOM DATA CWRITE) 
| PRORESEEEESESEEEREEEEEESEESESEREEERERERESEESESESSSEAESEEESEESERESESESSEEESEEEESS 
86733 027246 000137 027516 i$: TPC26 :V177640 GOTO V172360 
6734 Caress 010221 MOV R2,CR1)+ 3V177644 
8735 027 010321 MOV R3,CR1)+ 3V177646 
8736 027256 077 SOB RO,1$ 3V177650 
th 027260 RETURN 3V177652 
6739 027262 MTPB26: SUBTST <<MTPB26 RANDOM DATA CREAD)>> 
| ROREAERESESREEEEEREESEEEEEEEEEEEEEEREHEREEESSESEEESESESEEEEEDEERESESSSSESEEDESS 
;*SUBTEST MTPB26 RANDOM DATA CREAD) 
| CPS ESERERESEREEEEEASEEEEERERSE SEREEEEEEEEES ESL ESEREEESEEEEESSEEEEEEEESSEEDESEDSS 
8740 - DSABL 
6741 : LSB 
oat oa? 000157 027316 i$ JMP BOMTPC26 :V177640 GOTO V172360 
674 7 020221 CMP R2,CR1)+ 3V177644 
8744 027270 001401 BEQ 2s ;V177646 
6745 egrets 104451 PERR2S ;V177650 
8746 € 27274 005127 2s: COM CPC)+ 3V177652 
8747 027276 RANODD: O 3V177654 FOR ERROR REPORTING 
8746 027 020321 R3,CR1)+ 3V177656 
674 7302 001401 BEQ 3$ :V177660 
6750 0 iL 9 104451 PERR2S ;V177662 
6751 027 005167 177764 3%: COM RANODD 3V177664 
8752 027312 077015 SOB RO,1$ ;V177670 
87535 027314 000207 RETURN ;V177672 
67 .OSABL LSB 
ores -ENABL AMA 
8757 027316 MTPC26: SUBTST <<RANDOM NUMBER SUBPROGRAM>> 
| RSEREEAESEEERERSEEESSEEAEAAEEREEASESEEARESERESESSSEEESAEESREEEESERERESEEEEEEEEEEES 
; *SUBTEST RANDOM NUMEER SUBPROGRAM 
j SRASERERERERESESESELESAERASEEESEEEEEEAASESESESEASEESEESEREDES £O000044464066468686 
Le ;CALLER MUST SETUP 
8759 : MOV SEEDLO,.RS 
760 ; MOV SEEOHI .R2 
76 : Vv R3,RS 
87 ; R2,R4 
8763 027316 073427 000007 ASHC #7,R4 3V172360 
764 027 060 ADD R3.R5 ;V172364 
8765 027 005504 ADC :V172366 
Ls 7 060 ADD R2.R4 3V172370 
876 ye Hh 062705 001057 ADD #1057.R5 3V172372 
Th 6 027334 900 NOP :V172376 GOTO V172260 
8770 027336 MTPD26: SUBTST <<RANDOM NUMBER SUBSUBPROGRAM> > 
| RRSEERESSAERAESAESSSESEASESEAESESEAEESESERSEESEESEAHERESESEESSSSEEEEEEESELEEEEES 
; *SUBTEST RANDOM NUMBER S 
| RARSREEAEEREERESESAERARESESESEESEESSSESRERERERERSSSESEEEESSSEESE EAE SELES OEEEEDES 
8771 027336 005504 ;V172260 
orrs 027340 062704 047401 ADO #47401 ,R4 :V172262 
8773 027344 010505 MOV RS,.R3 3V172266 
8774 027346 010402 MOV R4,R2 3V172270 
8775 027350 000137 027252 BOMTPA2E +4 3V172272 GOTO V177644 


— eee ee —- 


8776 027354 


8779 cores 
os 7356 
4; 7360 
67 0273862 


876 
8°54 027364 


eee Oe eee 


011002 
010220 


077103 
000207 


CVMJABO MSV1i1-J MEMORY DIAG. 
RANDOM NUMBER SUBSUBPROGRAM 


177772 
177766 
177756 
177752 


002522 
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MTPOSO: SUBTST <<MTOOSO FLUSH OUT DBE’S>> 
ee a ne ny nee eeeeneemmmmmmnamas 


;*SUBTEST MTOOSO 
“——_ =e - er” ORRGRRRRIRIepnenenneneneeeecennees 


1%: MOV CRO),R 3V17764 
MOV Re, (0). 3V177642 
SOB Riis 3V177644 
RETURN 3V177646 


MTPO3S1: SUBTST <<MTPOS1 SOB-A-LONG TEST>> 
| RERREREEEREEEERESEESEERESESREREEREREEEEASEEAESESER ESSE SESEEESERERESEOREDESEDES 


;*SUBTEST MTPO3i SOB-A-LONG TEST 
scimmce:: «=k,SC«C( acct eneemeeeeneamumunmammnnmmaaams 


S 
0 ;MOVE TERMINATOR 
1s: S08 RO,1$ ;$08 TILL RO UNDERFLOWS 
COM é ;WRITE COMPLEMENT OF SOB 
CMP Ri,1$ ‘READ & CHECK FOR NOT "SOB RO,DOT” 
BEQ 23 ;0K - SKIP 
PERR3O 
MOV R1i,1$ 
2%: COM § ;CORRECT SOB INSTRUCTION 
MOV R2,R ‘REINITIALIZE SOB CONSTANT 
;UPDATE MOVE O REGISTERS 
MOV RS,R3 
TST CRS) ;BUMP (SAFELY) BY 2 
CMP R5.@OLINK1 ; DONE? 
3$ sNO - SKIP 
RETURN ; YES 
3$: MOV -(R3), -CR4) 
BNE 3$ 
BR i$ 
SOBLENGTH=. -MTPO31 
.ENABL AMA 


SEQ 0226 


a 
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- sell - 





MTPO31 SOB-A-LONG TEST SEQ 0227 
8835 027442 MTPOS2: SUBTST <<MTPOS2 WRITE RECOVERY TEST>> 
| SHREEEEREEESEEEERESEEEESEEDESEEEESESEEEEESSSEEESESSESSEEEEEEEEESEEESEDESEEESOEES 
; *SUBTEST MTPO3S2 WRITE RECOVERY TEST 
eR en Ee I oe ee 
Te TEST ACTUALLY sy a ALREADY IN THE MEMORY UNDER TEST. 
' THIS CODE INSURES THAT IT CH rw MEMORY TO HAVE 
1/2 BANK OF #5141 IS A “COM -C(R1)” INSTRUCTION AND 
175 BANK OF #110 WHICH IS A “JMP (RO)” #INSTRUCTION. 
ys Segy, 012401 i$: MOV CR4)+,R1 :V177640 ;GET DATA FROM LOWER 1/2 BANK 
7444 020102 R1,R2 3V177642 sIS IT #51417 
88435 027446 001401 EQ 2¢ ;V177644 sYES - SKIP 
027450 1044 PERRO2 :V177646 sNO_ - TAKE TR 
8845 027452 077 2s: 08 R3,1$ V177650 sLOOP FOR 1/72 BANK 
027454 0137035 902522 MOV @OLINK1,R3 3V177652 sRESTORE LOOP SIZE 
8647 027460 012 3$: MOV CR4)+,RO 3V177656 ;GET DATA FROM UPPER 1/2 BANK 
027 CMP RO,R 3V177660 :IS IT #110 
8649 027464 001401 BEQ ae 3V177662 ;YES - 
8850 027466 104427 PERRO1 ;V177664 ;NO- TAKE ERROR TRAP 
6651 027470 C77305 4%: SOB R3,3$ ;V177666 ;LOOP FOR 1/2 BANK 
8652 027472 000207 RETURN 


ES 





s Gypose” URTTe RECOVER 


6655 027474 


027510 


seeeeegenses 
RRA® 


Sawses 
% 
od 


aan 
6a~iIou 


SsteEEEErE 


o 
oe 
oO 
~ 
% 
> 


<< 


1627 
010102 
00520 


TEST 


000036 


002522 
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MTPOSS: SUBTST <<MTPO3SS 


BRANCH GOBBLE TEST>> 


| PRPESESERERESESREEEEEEEESSSESESAEEEEREEEEEEEREEESEESESESSEDOEEREESESESEEREEDEDS 
PO TEST 


{ SEESEESSESESSEESSESESESESESESSELESESSSSEESS EES ESAEESSSESESESESEESEEHESESEEESESSESES 
AMA 


BGTEST: 0 
BRGOBB: SEC 


CR1) 
BMI i$ 
INCB (R2) 
BR BRGOBB 


i$: 


2%: CLV 
INCB (R2) 
acs 3$ 
BVC 3$ 
BMI as 
3$: PERR35 
;UPDATE TEST POINTERS 
4s: MOV C.R1 
S$ SUB @5$-BGTEST,.R1 
MOV R1,R2 
INC 
;UPDATE MOVE REGISTERS 
MOV RS,R3 
TST (RS)+ 
MOV RS.R4 
poe? 
RS, @@LINK1 
BNE 63 
RETURN 
;MOVE CODE 1 LOCATION 
6$: MOV + seaheariena 
BNE 63 
CLR cR1 


BR BR 
GBLENGTH=. -MTPO33 
-ENABL AMA 


evs — FOR CORRECT C 


; T TOR 

;sTEST WORD (TWO BYTES) 

;SET CARRY CTO GE DT 0 “BGTEST” ) 
: NT LOW BYTE OF “RETEST” 

$ BIT7 IS 


WHEN 
s INCREMENT HIGH BYTE OF “BGTEST” 
;LOOP 128 TIMES 


ONDITION CODES 


:;8R IF V-BIT SET (SHOULD BE) 
:NO REPORT ERROR AND ABORT TEST 
s COND CODES NOT EQUAL TO 1010 
;CLEAR V-BIT 
HIGH BYTE OF “BGTEST” ONCE MORE 
SHOUL 


SHOUL 
sNO - RE AND ABORT TEST 
s COND CODES NOT EQUAL TO 1010 


;BUMP (SAFELY) BY 2 


: 
;NO - SKIP 
;YES - RETURN 


;CLEAR TEST WORD “BGTEST” 
;RUN MOVED CODE AGAIN 


SE@ 02268 


CVMJABO MSV11-J MEMORY DIAG. 


MTPOSS BR 
8901 027572 


_— —— 


8 027572 
8903 027574 
8904 027576 


8 610 
6910 027612 
8911 027614 





GOBBLE TEST 
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MTPO34: SUBTST <<MTPO34 


;*SUBTEST MTPO34 SOFT ERROR - BA 


i$: . RO) :V 77 
$oB R11. MTPO3S4 3V¥177642 
RETURN V177644 

2s: MOV CR4)+,R1 3; V177646 
CMP Ri, 3V177650 
BEQ 3$ :V177652 
PERRO? 3V1776 
NOP 3V177656 

3%: SOB R3,2$ :V177660 
RETURN ;V177662 


SOFT ERROR - BACKROUND PATTERN TEST>> 
oe ge ee a cneneens 


3 SESSSEEESASESESEESSEESEASEASESESSESSESASEESSESSESEEAESESSESESSESSEASSESESSESSESESOSOEESS 
MOV 


SEQ 0229 


CVMJABO MSV11-J MEMORY DIAG. 
RROR 


MTPOS4 SOFT E 
8913 027616 


8914 027616 
8916 027624 
027624 





- BACKROUND 


000003 


060000 
000005 
027674 


002034 


050354 
002000 


002034 
050354 


004000 
157776 


002076 


002076 
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PATTERN TEST 
MTPOSS:SUBTST <<MTPOSS WORST CASE NOISE PARITY TEST>> 


$ SHRESEASSSESEEESSESESESESSASESSESEESESESSSSESESSSSESEEEESSESEEESESSESESESSSESEEESESES 


3 *SUBTEST 


MTPO3S WORST CASE NOISE PARITY TEST 


j PRAESESSSEAEEESESEESESS . CERAEASEAESESESSESSEESESESSEASSEESESESEESESESESSSESESESSESESS 
MOV 


18: 


4$: 


@3,NOPAR 3;SET PARITY TRAPS TO RETURN TO “PARTHERE” 


FOR RO := @FIRST TO @LAST BY #4000 
MOV @FIRST,RO 


e pak’ TRAPS INTO CSR 


MOV @BIT2!BITO,CSR ;SET WRITE WRONG PARITY 


MOV  @1$,PARTHERE 
vy (RO), CRO) 


CRO) 
RO,ADDRESS 
OR +50 


;WWP TEST LOCATION 


PERBNK 
- (gtigeecet ieee 
READCSR 
RRGEN 
1CSR 
CRO), CRO) ;CLEAR WRONG PARITY IN MEMORY 
oe 
@3% , PARTHERE 
CRO) 
4¢ 
RO, ADDRESS 
OR +50 
ADD #4000,R0 
CMP RO, @LAST 
BLE 841 
E4l:sssssss 
;sRESET PARITY TRAP ACTION 


SEQ 0250 


ern — 


CVMJABO MSV11-J 


—— _—_—_— err 


Y OIAG. MACRO 
HYPOSS WORST CASE NOISE PARITY TEST 


8945 027760 


030100 
8977 030104 





002264 


002264 
177777 
002324 


177776 


002324 
030164 
000005 


002150 


002314 


002034 


YOS .02 
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MTPO36: SUBTST <<MTPO36 CORRECTION CODE TEST>> 
ee ge ce ccrrrenmmenaees 
:¢ PO36 CTION CODE TEST 
$ SHAESHEAOSSESSESSSSSSASSSASESESSSASSSSESASSESESESEEEHEESEESEESEEEEEEESDS 6$426666666666666 
; THIS TEST CHECKS TO SEE THAT EACH BIT OF A DATA WORD 
: CAN BE CORRECTED INDIVIDUALLY FROM A ZERO TO A ONE AND 
; VISA VERSA 
CACHOFF ; TURN OFF 
CLRB PASFLG ;CLEAR PASFLG 
CBREG ;ENABLE CHECK/SYNOROME BIT REGISTER 
REPEAT : 
| ; 
LET PAGFLG :O* PASFLG + @1  , INCRENENT LOOP COUNTEn’’ 
INCB PASFLG 
LET R@ := @-1 SINDEX TO SINGLE BIT ERROR TABLE 
LET BITNO := 40 ;CLEAR INNER LOOP COUNTER a ‘ 
IFB PASFLG EQ ¢1 ;SELECT DATA TO BE CORRECTED BY PASSNO 
CHP PASFLG. #1 
LET RS := 01 ;DATA=0;BIT TO BE CORRECTED IS A ONE 
MOV #1.R5 
ELSE 3 
BR L250 
ee 
LET RS :* 0177776 .DATA*177775;BIT 70 BE CORRECTED IS A ZERO 
HOV €177776.R5 
END 3 see 
REPEAT ; seeeets 
B43 :ssssse 
INC BITNO ; INCREMENT BIT POINTER 
LET R4 := R4 + O1 :POINT TO NEXT SET OF CHECK BITS 


LET R2 :B= PTABLECR4) 


ASH #5,R2 
BIS #B1T2,R2 
LET CSR := R2 





LOADCSR 

LET CR1) :* R 

TST (Ri) 

IF (Ri) NE RS 
LET ADORESS := 
LET CHECK := Re 
LET TSTDAT := RS 
LET TSTDAT+2 := CR1) 


#60000 


;GET NEXT SET OF CHECK @ITS 
MOVE PTABLEC(R4) ,.R2 
;SHIFT TO LINE UP IN CSR 
; ENABL 
:GET CHECK BITS TO BE WRITTEN 
MOV R2.CSR 
;LOAD CSR WITH DATA 
;WRITE DATA TO TEST ADDRESS 
MOV RO.CR1I) 


s;CORRECT SBE 

sWAS DATA CORRECTED??? 
CHP CR1).R5 
BE@ L251 


;MOV ERROR INFORMATION IN 
MOV #60000, ADDRESS 


MOV R2, CHECK 
MOV RS. TSTDAT 





SEQ 0231 


| CVMJABO MSV11-J MEMORY DIAG. 
MTPO36 CORRECTION CODE TEST 


011137 002250 
104052 


005011 
seere? 002264 


0237 : 0023524 





w 
So 
ee 
to) 


ocooooo cocco:e . . ®OOoC¢ 2OCCCKNKS - 
3eg 
So 
Ww 
eae ~ 
So 
LAVAS 





MACRO YOS.02 Monday 07-Oct-85 16:57 Pege 265-1 















SEQ 0232 
MOV (RL), TSTDAT+2 
ERROR +52 ;NO ERROR 
END t 
L2Si:sissas 
CLR (R1) ;CLEAR LUT 
IFB PASFLG EQ #1 ‘SHIFT NEW DATA DEPENDING ON PASFLG 
000001 CMPB PASFLG, 61 ) 
ASL RS \SHIFT BITNO TO THE LEFT’ | 
ELSE ’ 
BR L253 
L2S2:si8333 
SEC ;SET CARRY BIT AND...... 
ROL RS ‘ROTATE LEFT 
END $ 
L253: 535 
UNTIL BITNO EQ #16. UNTIL ALL BITS ARE DONE 
000020 CMP BITNO., 616. 
GNE 843 
COM RO ;COMPLEMENT DATA “ie ririty 
UNTILB PASFLG EQ @2 ‘UNTIL 2 PASSES ARE COMPLETE: 
000002 CMPB PASFLG.¢2 
BNE 
E42:sssies 
CLRICSR :CLEAR CSR 
CACHON ;TURN CACHE 
RETURN 3 
3 
; MSV11-P SINGLE BIT ERROR CHECK BIT TABLE 
037 PTABLE: .BYTE 2.7.37,31,.32.25.26.20,57.51,52.45.46,40, 75,70 
057 
045 
075 
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MTPO36 CTION CODE SEQ 0233 
8996 030204 MTPOS7: SUBTST <<MTPO37 CHECK ECC DISABLE TEST>> 
Fi SOSHHSSSSSSHSSSSSHSSSSSSSSSSSSSSSHASSSSSSSSSSSSSSHSSSSHEHSSEESESE 26266464646666666666 
 eSUBTEST “TPO37? CHECK ECC DISABLE TEST 
t SESSSSHSSSESSESSE LESESESSESSESSSESSSSSSSSHSSSSHSSSSSSSSSSSSSSSSHSSSSSSEESE ee2e602066866686 
é 
+ THIS TEST CHECKS THAT ECC CAN BE DISABLED AND THAT 
+ NO CORRECTION TAKES PLACE WITH ECC DISABLED. 
104424 CACHOFF TURN OFF CACHE 
GOOD := #0 ‘GOOD DATA FOR ERROR PRINT OUT 
005037 002044 CLR GOOD 
LET CHECK := #0 ;CLEAR CHECK BIT FIELD 
995037 002314 CLR CHECK 
1044 CB1CSR JENABLE SYNDROME/CHECK BIT REGISTER 
LET CHECK := #100 ;SBE CHECK BITS 
912737 000100 002314 MOV #100, CHECK 
104475 CBiCSR ;WRITE CHECK BITS TO CB REGISTER 
LET CR1) := @0 ‘WRITE CHECK BITS TO MEMORY 
005011 CLR (Ri) 
IF (R1) NE 20 ;WAS CORRECTION MADE?77? 
005711 TST (R1) 
001 BEQ L256 
LET BAD := (Ri) ;YES IT WAS..... ERROR 
011137 002052 MOV (R1).BAD 
LET ADDRESS := #60000 ; 
012737 060000 002034 MOV #60000, ADDRESS 
104037 ERROR +37 
ENO 3 
L256:sssies 





oases ceo atta ON CACHE 


ee eee 


role 


CVMJABO evi -2 J MEMORY DIAG. 
MTPO37 CHECK ECC DISABLE TEST 


9019 030256 


002102 
000011 
170037 
177740 


060000 
004000 


030256 0135704 
030262 072427 
042704 
012700 
012701 
162701 
105037 
30 C05037 
9031 030316 104475 
32 0 
105237 
062700 
062701 


012737 001340 002314 
104475 





MTPO41: SUBTST <<MTPO41 


3 *SUBTEST 


ee ee ee” 
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ADORESS TO CSR ON DOUBLE BIT ERROR TEST>> 
seneasseqnenacecessnsetsossoscstessgestoeee anh 


ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 
| SARSEEAEFESEEAEESESESESEEEEREEEEEEESEESESEEESSSESESESESESSESEEEEESESESEEEE SEEDED 


; THIS TEST CHECKS TO wr IF . coenect ADDRESS APPEARS 


; IN CSR BITS S-11 ON A DOUBLE 
LET R4 :* BANK 
ASH #9 
BIC erci740, R4 
LET := @-40 
LET R1 


LET PASFLG :B= #0 
CLR CHECK 

B1iCSR 

REPEAT 


roe Pew G 
LET :* RO + #40 


LET R1 := R1 + #4000 
LET CHECK := #13540 


CBiCSR 
LET CRI) := #0 


CLRiCSR 
TST CR1) 
READCSR 


;GET STARTING BANK NUMBER 


MOV 
;SHIFT INTO POSTION TO MATCH ADORESS” IN IN CSR 
‘CLEAR OFF EXTRANTOU 

;INIT CSR ADDRESS TO 0 - 1K (BIT 5 = ait K ADO. ) 


:* @FIRST - #4000 ;GET LOW ADDRESS IN BANK 


MOV @FIRST,.R1 
SUB €4000,R1 
sINIT PASFLG 
CLRB PASFLG 
;CLEAR CHECK BIT FIELD TO BE LOADED 
sENABLE CHECK/SYNDROME BIT REGISTER 
B44:sissss 
s;INC LOOP COUNTER 
SINC CSR ADDRESS TO BE EXPECTED 
ADD #40,R0 
3 
ADD #4000,R1 


;DOUBLE ERROR CHECK BITS 


MOV #1340, CHECK 


WRITE DOUBLE E 2M: CHECK BITS 
WRITE DATA AND D.E. CHK BITS AT A=0 
CLR (RL) 
;CLEAR CSR 
;sREAD ADDRESS TO GET DOUBLE 


E 
;READ CSR FOR CORRECT ADDRESS 


SEQ 0234 


Cc 


IAG. 


ee ee ee 


"BIT ERROR TES 
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wee eee ele 


VMJABO Vil-J Y 
MTPO41 ABDAESS TO CSR DOUBLE BIT E T SEQ 0255 
9042 030354 LET RS := CSR $ 
030354 013705 002150 MOV CSR,RS 
9043 030360 042705 170037 BIC #tC7740,R5 3 
3044 030364 LET R2 := RO ;GET CORRECT ADDRESS 
pe soa 010002 MOV RO,R2 
9045 030366 060402 ADD R4,R2 ;ADD STARTING BANK TO DOUBLE BIT ADORESS 
9046 030370 000240 ;0EBUG 
9047 pt 9 72 IF R2 NE RS ;00 ADDRESSES AGREE? 
0 72 020205 CMP R2,.R5 
030374 001405 BEQ L257 
9048 0303576 LET BAD := R2 $ 
030376 010237 002052 MOV R2.BAD 
9049 0 LET GOOD := RS 3 
0 010537 002044 MOV RS.GOOD 
9050 0 104455 PERR31 ;NO ERROR 
9051 030410 END : 
030410 L257:ssssias 
9052 030410 LET CR1) := 60 $ 
030410 cO5011 CLR (R1) 
9053 030412 104475 CBiCSR ;ENABLE CHECK/SYNDROME BIT REGISTER 
9054 030414 UNTILB PASFLG EQ PASCNT ;D0 16K AT A TIME 
030414 123737 002264 002570 CMPB PASFLG,PASCNT 
030422 001336 BNE 844 
030424 E44:sisaa3 
9055 030424 104503 CLRiICSR : 
eas 030426 000207 RETURN 3 


-_— —_—e --—— «= 


CVMJABO 
MTP 


030430 


ge 


33 3 


MSV11-J MEMORY 
ADDRESS TO CSR 


104424 
013704 
st 
012737 
000403 


012737 
042704 
072427 
052704 
062737 
105037 
013705 

0s 


105237 


013737 
010537 
104023 


DIAG. 


MACRO YOS.02 
ON DOUBLE BIT ERROR TEST 





002150 


002150 
002044 


EE me 


000177 


002570 


002570 


172352 


002150 


002150 


002052 
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MTPO42: SUBTST <<MTPO42 EXTENDED ADDRESS TO CSR ON ERROR TEST>> 


| PORDAS SEEECEEERESESEEEESEEESSSESESEEERESESEREEESERESESSSESESESESESESEOESESESESS 
s*SUBTEST MTPO42 EXTENDED ADDRESS TO CSR ON ERROR TEST 

| CROSERESEEEEESESEEESESESSSSEEESESEESEEASSEESESERSESEESESESESSSESEESEEEEEESESEDEEEES 
THIS TESTS THE EXTENDED Q-BUS ADDRESS IN THE 

CSR BY CAUSING A SINGLE ERROR, ENABLING BIT @ 14, THEN CHECKING 

FOR THE PROPER ADORESS IN THE CSR. 


CACHOF F J a OFF CACHE MEMORY 
LET R4 := BANK ;GET BANK NUMBER TO FIGURE OUT pli : ~ 


IF BANK EQ #177 


CMP BANK, @177 
BNE L261 
LET PASCNT := @1 ;CO ONCE IN LAST BANK 
MOV @1,PASCNT 
ELSE 
BR L262 
L261:sisssi 
LET PASCNT := #2 
MOV @2,PASCNT 
END 
L262: sssie3 
BIC @+C170,R4 ;CLEAR OFF LOWER BITS 
ASH @ ;SHIFT TO LINE UP WITH CSR 
BIS eeirie R4 ;SET EXTENDED ADDRESS BIT 
ADD 04 KIPARS ;SET UP PAR TO POINT TO TOP OF A BANK 
LET PASFLG :B= 00 SINIT LOOP COUNTER 
CLRB PASFLG 
LET RS := BANK ;RS GETS THE BANK NUMBER 
MOV BANK.RS 
BIC #tC7,RS ;CLEAR ALL BUT THE LOWER BITS 
ASH #9. ;ROTATE INTO POSTION 
BIS #BIT4,RS :SET UP SBE INDICATOR ;;DATA TO BE EXPECTED 
CBREG ‘ENABLE CHECK/SYNDROME BIT REGISTER 


eas: 
;INCR LOOP COUNTER apenas 
‘WRITE CHECK BITS TO CSR WITH DIAG MODE 


ie PASFLG 
MOV #104,CSR 


T CSR := 0104 


LOADCSR ;LOAD CSR WITH DATA 
LET CRI) := 00 ;WRT ZEROS AT A=0 AND SINGLE — an tat) 
CLRiCSR ;CLEAR CSR 
TST CR1) ;READ paneer BIT O SHOULD BE CORRECTED TO Al 
READCSR ;sREAD CSR F 
BIC #B8IT13.CSR ‘CLEAR POSSIBLE INHIBIT MODE IN DATA “CSR” 
IF CSR NE RS THEN sHAS SINGLE ERROR BITS SET IN Te con 
BEQ toes 
LET BAD := CSR ; 
MOV CSR,.BAD 
LET GOOD := RS ; 
MOV RS.GOOD 
ERROR +23 3 
END 3 





SEQ 0256 


—— ee eee _ 
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MTPO42 EXTENDED ADDRESS TO CSR ON ERROR TEST SEQ 0237 
030610 L263:isaaes 
9097 030610 LET CSR := #40000 ;WRITE EQB BIT TO CSR 
030610 012737 040000 002150 MOV #40000 ,CSR 
9096 030616 104425 LOADCSR ; 
9099 030620 104426 READCSR ;READ FOR CORRECT EXTENDED Q-BUS ADDRESS 
9100 oases 042737 020000 002150 BIC #B1IT13,CSR CLEAR INHIBIT MODE POINTER IN DATA 
9101 0306 IF CSR NE R4 THEN ;sREAD EQB ADDRESS 
030630 023704 002150 CMP CSR,.R4 
030634 001411 BEG L264 
9102 030636 LET BAD := CSR ; 
030636 013737 002150 002052 MOV CSR,.BAD 
9103 030644 LET GOOD := R4 : 
030644 010437 002044 MOV R4.GO000 
9104 030650 SET HEADER ; 
0306 012737 177777 002612 MOV #@-1,HEADER 
9105 0306 104023 ERROR +23 ; 
9106 030660 END : 
030660 L264:sssaci 
9107 030660 LET CRI) := #0 ;CLEAR LUT 
030660 C05011 CLR (R1) 
9108 030662 LET RL := #137776 ;SET UP NEW ADDRESS 
030662 012701 137776 MOV #137776.R1 
9109 030666 062705 000740 ADD #740,R5 ;ADD TO » NEW ADDRESS 
9110 030672 052704 001000 BIS @#BIT9,R4 ;SET BIT 9 SINCE WE ARE ASSERTING Al ON PASS2 
9111 030676 104515 CBREG ;ENABLE CHECK/SYNDROME BIT REGISTER 
9112 030700 UNTILB PASFLG EQ PASCNT ; LOOP 2 TIMES 
030700 123737 002264 002570 CMPB PASFLG,PASCNT 
030706 001312 BNE B45 
030710 E45:sisias 
9113 030710 104503 CLRiICSR ;CLEAR CSR 
9114 030712 104423 CACHON ;TURN ON CACHE 
9115 030714 000207 RETURN 


— ~<a “ 


ee se ee e+ 
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MACRO Y 
MTPO42 EXTENDED ADDRESS TO CSR ON ERROR TEST SEQ 0236 


9117 030716 MTPO43: SUBTST <<MTPO43 WRITE BYTE CLEARS SINGLE BIT ERROR TEST>> 
erp peer ge - nnn 
;#SUBTEST MTPO43 WRITE BYTE CLEARS SINGLE BIT ERROR TEST 
| RARSEEEEEEEEEESEEESEERESEESESEESEESEEEEEEEEEEESERSSEREEESESESESESOEESEEOOEEESSS 
9116 3 
9119 ; THIS TEST CHECKS TO SEE IF A SINGLE BIT ERROR WILL BE CORRECTED DURING 
9120 AD PORTION OF A WRITE BYTE AND THAT THE CORRECT CHECK BITS WILL 
otea . BE GENERATED ON A WRITE. 
9123 030716 104424 CACHOFF ; TURN OFF CACHE 
9124 0307 104513 CBREG 1 ENASLE CHECK/SYNDROME BIT REGISTER 
9125 030722 37 002264 CLRB PASFLG CLEAR LOOP C 
9126 030726 LET R2 :*= Ri + #1 ;R2 POINTS TO HIGH BYTE , 
0307 010102 MOV R1,R2 
0307 005202 INC R2 | 
9127 030732 LET R4 := @1 s INITIAL DATA = 1 
030732 012704 000001 MOV #1,R4 
9126 030736 REPEAT ; 
030736 B46: sities 
9129 030736 105237 002264 INCB PASFLG s INCREMENT LOOP COUNTER 
9130 030742 LET CSR := #604 ;sWRITE CHECK BITS CORRESPONDING TO DATA OF O 
030742 012737 000604 002150 MOV #604,CSR 
9131 0307 104425 LOAOCSR ;WRITE CSR 
9132 030752 LET CR1) := R4 WRITE DATA OF 1 CREATING A SINGLE ory ERROR 
030 010411 MOV R4,(R1) 
9133 030754 104503 CLRiICSR ;sWRITE CSR TO NORMAL MODE 
9134 030756 LET (R2) :B= 4377 ‘WRITE BYTE OF WORD 
030756 112712 000377 MOVB #377,(R2) 
9135 030762 104426 READCSR ;READ CSR 
9136 030764 042737 177757 002150 BIC #tC20,CSR ;SEE IF SBE peeaenren IS SET 
9137 030772 IF CSR NE #20 ;IS SBE SET??? 
030772 023727 002150 000020 CMP CSR,920 
031000 001407 BEQ L266 
9138 031002 LET GOOD := #20 3 
1002 012737 000020 002044 MOV #20,G00D 
9139 031010 LET BAD := CSR 3 
31010 013737 002150 002052 ; MOV CSR.BAD 
9140 031016 104060 ERROR +60 3 
9141 031020 END ; 
1020 L266:isse3 
9142 031020 104513 CBREG ;WRITE CSR TO DIAG MODE 
9143 031022 005711 TST CR1) ;READ SAO FOR CORRECT CHECK BITS 
9144 031024 104426 READCSR ;REAC CSR 


—— as 


CVMJABO MSV11-J MACRO YOS.02 
WRITE BYTE CLEARS SINGLE BIT ERROR TEST 


9145 0310 


9150 031066 
9151 031070 

031070 
9152 031070 
9153 031072 


0310 
9154 031076 
031076 
031104 
031106 
9155 031106 
9156 031110 


-_——- => «= eee 


J MEMORY DIAG. 


042737 


023727 
001412 


012737 
012737 
013737 
104061 
005302 
012704 


123727 
€01314 


104423 
000207 


174037 
002150 


177777 
000300 
002150 


000400 
002264 





BIC #tC3740,CSR 
IF CSR NE #300 


SET HEADER 
LET GOOD : 
LET BAD : 
ERROR +61 


DEC Re 
LET R4 : 
UNTILB PASFLG EQ ¢@2 


CACHON 
RETURN 


Se mm 
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sMASK OUT CHECK BIT FIELO 
sWERE CORRECT CHECK BITS Soe 


BEQ L267, 
MOV #-1,HEADER 
MOV #300,G000 
MOV CSR,BAD 


0300 


4? al TO HIGH BYTE AND REPEA 
sBIT O OF HIGH BYTE 


;D0 HIGH AND LOW BYTE 


_* 


MOV €400,R4 
CMPB PASFLG, 2 
BNE B46 

E46: i:ssce% 


;TURN ON CACHE 
; 


SEQ 0239 


——sa ae 


——— ae 


CVMJABO MSV11-J 
MTPO43 


9158 031112 


BEBBSSEEK 


Pt pee ah ee pe 
Re 


9191 0 
9192 Oatats 


9193 sie 
9194 Osia20 


104424 
105037 
012705 
104475 


€12702 
105237 
005037 


005237 
010204 
010237 

25 


0137035 
042703 


020304 
001412 
010157 


SS 


Y DIAG MACRO YOS.02 
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002264 
174037 


000046 


002150 


002150 
020000 


002034 





Monday 07-Oct-85 16:57 Page 272 


MTPO44: SUBTST <<MTPO44 


nt ee — 


SHIFTING CHECK BITS THROUGH THE CSR TEST>> 


ST eee ee YE ek 1 eee 
P044 


3 *SUBTEST 


SHIFTING CHECK BITS 


THROUGH THE CSR TEST 


| PERREREERES LESSESERAESEESSSESSERSSEESSSESEEEESESESEASSEASSESSSESSSESESEESEESESSEESESSE 


THIS TEs. 
BY SHIFTING A ONE BIT THROUGH A 
FIELD OF ALL ONES. 


REPEAT 


CACHOFF 
LET PASFLG :B= #0 
LET RS := #174037 


CB1iCSR 
LET R2 


REPEAT 
LET PASFLG :B= PASFLG + #1 


:= @46 


LET PASSNO 
REPEAT 
LET PASSNO := PASSNO + #1 
LET R4 := R2 
LET CSR := R2 


:= #0 


LOADCSR 
LET CR1) := #0 


LET CSR := R4 

LOADCSR 

READCSR 

LET R3 := CSR 

BIC #BIT13,R35 

IF R3 NE R4& THEN 
LET ADDRESS := R1 


LET GOOD := R4 


CORRECT PATTERNS. THE TEST IS THEN REPEATED ON A 


CHECKS THE ABILITY " READ AND WRITE CHECKBITS INTO MEMORY 
FIELO OF ZEROS. ao Cc 


SR IS READ A THE 
ZERO BIT THROUGH A 


sILC; ;REV B 
B4a7issssas 
3; TURN OFF CACHE 
; INIT PASFLG 
CLRB PASFLG 
;CHECK BIT MASK FOR CSR 
#174037 ,R5 


sENABLE CHECK/SYNDROME - REGISTER 
;SET UP INITIAL CSR DAT oag.02 


B50: sssss3 
;INC LOOP COUNTER 
INCB PASFLG 


;CHK BITS = 

; DISABLE ECCsDIAG, CHK SET 

;INIT PASSNOCINNER LOOP COUNTER) 
CLR PASSNO 


BSisssssss 
;INC LOOP COUNTER 
INC PASSNO 


;COPY R2 TO R4 
MOV R2,R4 
;GET CSR DATA TO BE WRITTEN 


R2,CSR 
WRITE SBE CHECK BITS TO CSR 
;WRITE DATA AND CHECK BITS AT A=0 
CLR (R1) 

;COMPLEMENT MASK 
;SAVE RS ON STACK 
;CREATE AN XOR FUNCTION 
; 


MOV R4,CSR 
;LOAD CSR WITH COMPLEMENT CHECK wITS 
sREAD CSR FOR COMPLEMENT CHECK BITS 
: COPY CSR DATA TO RS 


MOV C 
;CLEAR ANY POSSIBLE INHIBIT Rove POINTER 
;READ CSR FOR PROPER CHECK BIT 
CMP RS sna 
BEQ L271 


MOV R1,ADDRESS 





SEQ 0240 





CVMJABO wev33 
MTPO44 SHIFTI 


coocooocoooooooooo 


$238 


ococoooooococecoo oo 


PLOT IT ITIL IL IL IS LIL AT OL OL OL OT LL ET OT OS OY Oa oY OY OT oN 


SSESEESRELSEET SSE eees SSSs 


oooo 
ow 
ut 
sh 
& 


010437 
010337 
012737 
104463 


013737 
010137 
012737 
104464 


040502 
123727 
001002 


062702 
123727 
001262 


-J MEMORY DIAG. 
NG CHECK 


002044 
002052 
177777 


002150 


002150 


002044 
002150 
002034 
177777 


002264 


002266 000006 


002612 


002052 


002612 


000001 
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BITS THROUGH THE csr TEST 


LET BAD := RS 
SET HEADER 
PERR37 

ND 


COM RS 
TST CR1) 
NOP 


REAOCSR 
BIC RS.CSR 
LET R4 := R2 


BIC RS,.R4 
IF R4 NE CSR 


LET GOOD := R4 
LET BAD := CSR 
LET ADDRESS := Ri 
SET HEADER 
PERR40 


END 


BIC RS,.R2 
IFB PASFLG EQ #1 


BI 
BIS (SP)+,R2 
COM R 


END 
LET R2 


:= R2 + 06 


UNTILB PASSNO EQ #6 


eee ee 


SEQ 0241 


MOV R4,G000 
MOV RS.BAD 


MOV @-1,HEADER 
;:ILC; ;REVB 


; 
sERROR CALL 
L27Lisssssss 
;COMPLEMENT MASK 
READ CHECK BITS AT A=0 INTO CSR 
;READ CSR FOR CORRECT CHECK BITS 
;MASK OUT CHECK BIT 
;GET CHECK BITS THAT TERE WRITTEN 
MOV R2,R4 
;MASK OUT CHECK BIT FIELD 
SARE CHECK BITS THE SAME? 
CMP R4,CSR 
BEQ L272 
' MOV R4.GO0D 
MOV CSR.BAD 
MOV R1, ADDRESS 


MOV @-1 »HEADER 
;3;ILC; ;sREVB 


; 
;ERROR CALL 


L272:33 RES 
;SHIFT CHECK Sh AND CREATE NEW DATA FOR CSR 


;SELECT FUNCTI 
CMPB PASFLG,@1 
L273 


BNE 
:D0 A FIELD OF ZEROS--->ONES 
;SHIFT CHECK BITS 
:D0 A FIELD OF ONES ~~ are 


274 
L273S:ssssas 


; TAKE OUT CHECK BIT FIELD 
; 
; 


‘SHIFT CHECK BITS 

‘PUT BACK CHECK BIT FIELD 
; 

3 


; COMPLEMENENT DATA PATTERN 


L274:33 
;ADD 6 SO THAT WRITE ON 


:D0 ALL CHECK BITS 
PASSNO, 66 
BNE B51 


‘Age WILL ENABLE DIAG MODE 
ADD 26,R2 


———— 


CVMJABO MSV1 


eS 


RYpoas CRIFTING EHEC CHECK 


376 
9232 031376 


9236 031450 
9239 031432 


012702 


5180 
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Y OIAG. MACRO YOS. 
BITS THROUGH THE CSR TEST 


003706 
002264 000002 


000100 
002562 


LET R2 := #3706 
UNTILB PASFLG EQ #2 


CLRICSR 

CLR CR1) 

ADD #100,R1i 
UNTIL R1 EQ ENDADD 


CACHON 
RETURN 


ESl:sssaas 
;REPEAT WITH FIELD OF 
MOV €3706,.R2 


CMPB PASFLG,@2 
BNE 850 
ESO:ssisas 
: 
;ALL 256 TO ADDRESS : ILC; sREVB 
: Lee neve 
R1.END 
847 
E47:ssaase 


;TURN ON CACHE 
i 


SEQ 0242 


CVMJABO pdb ? Ba J MEMORY 
MTPO044 SHIFTING CHECK 


9241 031434 


9243 
9245 


9246 
47 031434 
031436 
031440 


104424 
104515 


005037 
012737 
012737 


012737 
013737 
104063 


104514 
104426 
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BITS THROUGH THE CSR TEST SEQ 02435 
MTPO45: SUBTST <<MTPO4S SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST>> 
ee ae Oe ee a ee 
3; *SUBTEST MTPO45 SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST 
| PEASE SEEEEEEEEESEEEESEEESEEEEEESEESESEESEEESEEEDEESESESEEESESEEEESSEEEEESSOOEEES 
: 
; THIS TEST vem TO SEE IF THE DOUBLE BIT ERROR INDICATOR IS SET 
; ON A DOUBL T ERROR AND THE C CT SYNDROMES ARE LATCHED INTO THE 
; CSR. THIS TEST IS THEN REPEATED WITH SUL TIPLE ERROR CHECK/SYNDROME BITS 
3 
CACHOFF ;TURN OFF CACHE 
CBREG sENABLE CHECK/SYNDROME BIT REGISTER 
LET PASSNO := #0 ;CLEAR LOOP COUNTER 
002266 CLR PASSNO 
LET GOOD := #3744 :GO0D DATA 
003744 002044 MOV #3744 ,G000 
LET CSR := #3144 ;0BE CHECK BITS FOR CSR 
003144 002150 MOV #3144,CSR 
REPEAT 3 
BS2:ssssss 
002266 INC PASSNO : 
LOADCSR ;sWRITE OBE CHECK BITS TO CSR 
LET CRI) := 00 ‘WRITE ZEROS AND DBL ERROR CHK a SE Oar) 
CLRiICSR ;CLEAR CSR OUT 
TST CR1) ;sREAD A=0 TO GET DOUBLE BIT ERROR 
RE SR :WAS UNCORRECABLE ERROR BIT SET??? 
IF #B8IT1S OFF.IN CSR ; 
100000 002150 BIT #BIT15.CSR 
BNE L300 
SET HEADER : 
177777 002612 MOV #@-1,HEADER 
LET BAD := CSR : 
002150 002052 MOV CSR.BAD 
ERROR +63 sBIT NOT SET 
END : 
L300:ssiiss 
SYNREG ;ENABLE SYNDROME BIT REGISTER 
READCSR ;READ CSR FOR CORRECT SYNDROME BIT 


Ue 


Vil-J MEMORY DIAG. 


9279 031620 





gooey 
042737 


023737 
001407 
013737 
012737 
104042 


005911 
012737 
012737 
C23727 
001322 


174035 
002150 


002150 
177777 


003604 
003004 
002266 


002150 





NOP 
BIC #tC3744,CSR 
IF CSR NE GOOD T 


LET BAD := CSR 
SET HEADER 


ERROR +42 
END 


CLR CR1) 

LET GOOD := #3604 
LET CSR := #3004 

UNTIL PASSNO EQ #2 


CLRiCSR 
CACHON 
RETURN 
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MTPO45 SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST 


;DEBUG AIDE 


;MASK SYNDROMES OUT 
;CHECK IF DOUBLE ERROR BIT IS SET 

CMP CSR.GOOD 

BEQ L301 
;B8AD DATA 

MOV CSR,.BAD 
MOV @-1, HEADER 
; 
; 

L3OL:sssass 

;CLEAR L 


sREPEAT WITH MULTIPLE ERROR SYNDROMES 


MOV #3604 ,GOOD 
sMULTIPLE ERROR CHECK BITS 

MOV #3004 ,CSR 
; 


CMP PASSNO, @2 
BNE B52 
ES2:isssas 


SEQ 0244 


ee ee - 





ee 
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SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST SEQ 0245 
9281 031622 MTPO46: SUBTST <<MTPO46 CHECK SINGLE BIT ERRORS WITH ECC DISABLED>> 
FY SSSHSSSSSSSESSESSSSSSSSSSHESSSSSSSESSSSSSSSSSSSSSSSSSSSSSSSSSSSSSHSHHSSEESEHEEED 
eSUBTEST MTPO46 CHECK SINGLE BIT ERRORS WITH ECC DISABLED 
92 t SSESSHSSSSSHASSSSSSSSSSOSSSASSSASSSSSSSSSSSSSSSHSSSSSSSSSSSSHSSHSSSSSSHESSSHSESE meek Hr 
3 
$3 ' THIS TEST CHECKS TO SEE THAT FOR EACH BIT OF A DATA WORD THAT A SBE 
‘ IS TREATED LIKE A UNCORRECTABLE ERROR WITH ECC DISABLED AND TRAPS 
’ ARE DETECTED. 
i 
005037 002266 cir ‘PASSNO ;CLEAR OUTER LOOP COUNTER 
| 104424 CACHOFF ‘TURN OFF CACHE 
REPEAT 
' BS3S:ssssas 
9290 ¢ LET PASSNO := PASSNO + @1 ; 
: 37 002266 INC PASSNO 
3 CLR RO ;CLEAR DATA 
| 105037 002264 CLRB PASFLG ‘CLEAR PASFLG 
| 104513 COREG ‘ENABLE CHECK/SYNOROME BIT REGISTER 
' 654: 3% 
9295 031644 LET PASFLG :B= PASFLG + #1 =; INCREMENT LOOP COUNTER 
031644 105237 002264 INCB PASFLG 
9296 LET RA :* @-1 ;INDEX TO SINGLE BIT ERROR TABLE 
| 012704 177777 HOV @-1.R4 
9297 ¢ LET NOPAR := #1 ;ENABLE PARITY ACTION 
| 012737 000001 002076 MOV 01.NOPAR 
9296 ¢ LET BITNO := @0 ;CLEAR INNER LOOP COUNTER 
7 005037 002324 CLR BITNO 
9299 ¢ IFB PASFLG EQ #1 ;SELECT DATA TO BE CORRECTED BY PASSNO 
123727 002264 000001 CMPB PASFLG. @1 
4 001003 BNE L30 
9300 031676 LET RS := @1 ;DATA*0;BIT TO BE CORRECTED IS A ONE 
931676 012705 000001 MOV 81.R5 
9301 C ELSE ; 
931702 000402 BR L304 
7 L303:3; 
9302 ¢ LET RS := 0177776 ;DATA*177776;81T TO BE CORRECTED IS A ZERO 
D31704 012705 177776 MOV 6177776.R5 
9303 031710 END , 
7 L3SO04:sssses 
9304 031710 REPEAT ; am 
; seseeeees 
9305 031710 LET PARCNT := 00 ;CLEAR PARITY COUNTER 
931710 37 002072 CLR PARCNT 
9306 081714 37 002324 INC BITNO FINCREMENT BIT POINTER 
9507 081720 LET R4 :* RO > O1 ‘POINT TO NEXT SET OF CHECK BITS 
9308 0317 sini LET R2 :B* PTABLE(R4) GET NEXT SET OF CHECK BITS | 
9309 ¢ o7gee7 090005 ASH @5,R2 ;SHIFT TO LINE UP IN CSR 
9 10 ; 000006 BIS #B1T2!:BIT1.R2 ; ENABLE 
9311 0317 LET CSR :© R2 ‘GET CHECK BITS TO BE WRITTEN 
D$1736 010237 002150 MOV R2.C 
9312 0817 LOADCSR ;LOAD CSR WITH DATA 
9318 0317 LET CRI) := RO WRITE DATA TO TEST ADDRESS 
931744 010011 MOV RO,(R1) 
9314 031746 IF PASSNO EQ 61 ;WRITE CSR 





—— 
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ait Sue 






3316 ¢ 


oe ee Se ee ee Se ee ee ee Se See Se Se Se Se Se Ge Se Gr Se Se Ge 





van in a a a a A a a 


IOSOOOSSOOO SSS 
“+ 


cf ¢ 





> 2 as ool 


104471 
000401 
104507 


137 
104426 


001007 


013737 
012737 
1 s 


503 
11 


091002 


006105 


ce o oesze7 
1011 
9345 6 


032106 


000001 


EccioIs 
ELSE 





ENA1SBE 
END 


TST (Ri) 
CALL 





CHKTRP 
IF @#61Ti1S5 OFF.IN CSR 


LET BAD := CSR 
SET HEADER 
ERROR +45 

ENO 


CLR1ICSR 
CLR (R1) 
IFB PASFLG EQ ¢1 


ASL RS 
ELSE 

SEC 

ROL RS 
END 


UNTIL BITNO EQ 16. 


COM RO 
UNTILB PASFLG E@ @2 


UNTIL PASSNO EQ #2 


sisst 





CHKTRP: IF PASSNO EQ #1 


IF PARCNT EG #1 





CMP P 41 
SNE LOS 
FIRST PASS ;€CC DISABLE.NO PBL 
«305.,, OR +3 
SECOND PASS ;ECC DISABLE.PBL ENABLED 
: L3SO6:sisses 





sCORRECT SBE 

sCHECK FOR CORRECT 
sREAD THE CSR FOR 
3IS UNCORRECTABLE 






Cras ERROR 
BIT SET?777 

BIT — 
BNE 13507 

MOV CSR.BAD 
MOV @-1,HEADER 


5 
L3O7: sssass 


’ 

sCLEAR LUT 

sSHIFT NEW DATA DEPENDING ON PASFLG 
CHPB PASFLG, #1 

BNE L310 

sSHIFT BITNO TO THE LEFT 

; 








OR L311 
L3L0:ssisss 
;SET CARRY BIT AND...... 
sROTATE LEFT 


; 
L3li:sssses 
;UNTIL ALL BITS ARE 
Chp ae eee. 
alec 


ES 
sCOMPLEMENT DATA AND 
sUNTIL 2 PASSES ARE 





ES4:sssse3 
: 
ESS:ssssas 
; TURN CACHE 
$ 
sPASS 1 CHECK FOR NO TRAP 
CHP PASSNO,. @1 
OME L315 


eee 


SEQ 0246 — 


- A =A ne ee eee en eee eran ea ee RS GN —_ 
— — 


032116 
032124 
9346 032126 
126 


9355 032160 


ae ee ee ee 


023727 902072 900001 
001004 


012737 177777 002612 
104057 


000410 
023727 002072 000001 
001404 


012737 177777 002612 
104064 


000207 
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SET HEADER 


ERROR +57 
END 


ELSE 
IF PARCNT NE @1 


SET HEADER 
ERROR +64 
ND 


END 
RETURN 


—— © ee -- 


CMP PARCNT,@1 
BNE L316 


MOV @-1,HEADER 


L316:sssaas 


BR L317 
L3iS:sssssas 


CMP PARCNT, #1 
BEQ L320 


MOV @-1, HEADER 


L320: sissies 
L317:sssssas 


SEQ 0247 


— eee re OE 
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—-<- = 







MTPO44 CHEC* SeQ 0248 
9357 032162 MTPO47;: SUBTST <<MTPO47 NO CSR UPDATE ON SBE WITH EXSISTING DBE>> 
eee ee eee eae a a a =:!:C:C:C*”*~<;<CS~:S 
;@SUBTEST 7 NO CSR UPDATE ON SBE WITH EXSISTING OBE 
5 3 SSEHSESSSSSHSSSSESSSSSSSSESSSSSHSHESSESESESESSSSESSSESESASHESESESSSSSSSSESESSSSEHESEEEEE ae 
935¢ ; 
9359 ; THIS TEST CHECKS TO SEE THAT THE CSR CONTENTS WILL NOT CHANGE 
9360 ; WITH A SINGLE BIT ERROR WHEN A DOUBLE BIT ERROR ALREADY 
9361 ; EXISTS. 
9363 05<c162 104424 ACHOFF + TURN OFF CACHE 
9364 os2i6é LET R4 := BANK :GET BANK NUMBER 
032164 013704 002102 MOV BANK,R4 
9365 032170 %72427 000011 ASH @9 ;SHIFT INTO PLACE 
366 032174 04<¢/04 170037 BIC o707740,R ;MASK OUT UNWANTED BITS 
7 0527 100000 BIS @BIT15, has ;SET UP GOOD DAT 
9368 0 104513 ;ENABLE CHECK/ OS YNOROME BIT REGISTER 
9369 032206 LET CSR := 03144 ;CHECK BITS FOR DOUBLE BIT ERROR 
932206 012737 003144 002150 MOV #3144,CSR 
9370 032214 104425 LOADCSR : 
9371 032216 LET (R1) :* 0 ;WRITE DGE CHECK BITS 
6 005011 CLR (A1) 
9372 0 LET CSR := 0104 ;WRITE S8E CHECK BITS 
0 012737 000104 002150 MOV #104,CSR 
373 032226 1 LOADCSR ; 
9374 0 LET (R2) := 00 ;WRITE SBE CHECK BITS AT ADDRESS + 4K 
0 005012 CLR (R2) 
9375 0 104503 RICSR ;CLEAR CSR 
9376 032234 005711 ST (Ri) ;READ DBE LOCATION 
9377 032236 104426 RE ;READ FOR CSR DBE INDICATOR 
9378 0 042737 020000 002150 BIC #B1T13,CSR :CLEAR TWHIBIT MODE POINTER 
9379 032246 IF CSR NE R4 : 
0 023704 002150 CMP CSR.R4 
0 001411 BEQ L321 
9380 0 LET BAD := CSR : 
0 013737 002150 002052 MOV CSR,BAD 
9381 0 LET GOOD := R4 ; 
0 010437 002044 MOV R4,GO0D 
9382 0 SET HEADER ; 
0 012737 177777 002612 MOV @-1,HMEADER 
9363 032274 104063 ERROR +63 ; 
032276 END : 
032276 L32i:sssisss 
9385 032276 052704 000020 Bis 020,R ;SET BIT IN GOOD DATA 
032 005712 t ches ;READ 
9387 032304 1044 ;READ CSR FOR NO CHANGE 


Ee 


_——— 


ee tt, ay ar. LL LC CC LL Cl LL LL LL LL LLL LLL LLL LLL LLL LLL LLL LLL LL 
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GYpoa?, NO CSR ON SBE WITH EXSISTING _ 


UPDATE SBE OBE SEQ 0249 
9386 032306 042737 020000 002150 BIC @#BIT13,CSR ;CLEAR INHIBIT MODE POINTER 
9389 032314 IF CSR NE R4 ; 
032314 023704 002150 CMP CSR,.R4 
001411 BEG L322 
LET BAD := CSR ; 
013737 002150 9002052 MOV CSR.BAD 
LET GOOD := R4 ; 
010437 002044 MOV R4,.G00D 
SET HEADER 3 
012737 177777 002612 MOV @-1,HEADER 
104051 ERROR +51 
END : 
L322:se833% 
104503 CLRICSR ;CLEAR 1 CSR 
005011 CLR CRI) ; 
00501 CLR (R22) 3 
10442 CACHON ; TURN ON CACHE 


000207 RETURN 





_— ewe ee ee 
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SEQ 0250 
9401 .SBTTL MISC SUBROUTINES 
oa08 032356 REGCOPY:SUBTST <<SUBR COPY RO TO R4,R1 TO R3, & R2 TO RS>> 
{ PSSSSESSSESSESESSESESESESEESESSESEESSEEESSSSSHSSSESHAESSSSESSSSSSSEESEESOEESESESES 
; ¢SUBTEST SUBR COPY RO TO R4,R1 TO R3, & R2 TO RS 
5 SHRESSSASESSSSSSHSSESSHESSSASSESHEASASSSESSESSASASESSESSSSESEASSSSSEEESESEESESESEEHEESEEE 464 
9404 032356 010004 MOV ‘ 
9405 032360 010103 MOV R1i,R3 
9406 032362 010205 MOV R2,.R5 
9407 032364 000207 RETURN 
9409 032366 FLIPWARN:SUBTST <<FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS>> 
3 SEAEEASSAAASSSESASSSESEESASEESSESSESERSESSSESSESASSESEEASSESESEESSESSESESESESESEEESESESEHEEEES 
; #SUBTEST FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS 
{SRSA ESSSEESSESASEESERERESESEERESEESSSESSESEESSESSSSSSESSSSESESESESSSESESSESEESEEES 
9410 032366 RO 
032 010046 MOV RO, -(SP) 
9411 032370 005237 002616 INC FLIPLOC 
9412 032374 042737 177774 002616 BIC @tC3,FLIPLOC 
9413 032402 C22737 000001 002616 CMP @1,FLIPLOC 
9414 032410 001414 BEG 
9415 032412 022737 000002 002616 CMP @2,FLIP OC 
9416 032420 001413 BEQ 
9417 032422 022737 000003 002616 CMP 3, FLIPLOC 
9418 032430 001414 BEQ 3$ 
9419 0 32 CLR RO 
9420 0 013704 002614 MOV ONES ,.R4 
9421 0 4$ 
9422 032442 1$: CLEAR RO,R4 
032442 005000 CLR RO 
032444 005004 CLR R4 
9423 932446 000411 BR as 
9424 032450 012700 000401 2$: MOV €401,R0 
9425 032454 013704 002614 MOV ONES .R4 
9426 032460 4$ 
9427 0 012700 000401 3$: MOV 401,R0 
9428 0 012704 000401 MOV 401,R4 
9429 032472 010037 024650 4$: MOV RO, WARN2 
9430 032476 010037 024664 MOV RO, WARNS 
9431 932502 010037 024710 MOV RO, WARN4 
9432 032 010037 024724 MOV RO, WARNS | 
9433 032512 POP RO 
012600 MOV (SP)+,RO 


-————— = 


-_ 


~ 





———— A | ee me 
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FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS SEQ 0251 
9436 032516 BACKGND:SUBTST <<SUBR WRITE BACKGROUND>> 
ce age og nen anmanmanaammmamamaate 
s ¢SUBTEST SUBR WRITE BACKGROUND 


| PRAAERESESASESESESESESERERESERESEEEEEESREEEEESEEEEBESEEESEESEAEEEEESSESESSEEEDEROSS 
nos Sh DATA FROM R2 


oF IRST,RO 
erty eM 012701 040000 MOV @SIZE,R1 | 
0325 012737 000207 0245352 MOV 0207 ,MTPO000+4 ;WARNING PUTTING “RETURN” AFTER WRITE 
0 024 002262 MOV @MTPOOO , SUPDOADD 
] 004737 024334 CALL SUPO 
0325 012737 000240 024532 MOV 0240 ,MTP000+4 sRESTORE ‘NOP’ AFTER WRITE 


Sbbboessces 
a 


LE LLL LLL = 


Cc 
S 


VMJABO MSV11-J MEMORY DIAG. 
GROUND 


UBR WRITE BACK 
9449 032562 


ee ee ce 


002104 
002664 


177741 
002152 





me ee —— 
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GETCSR: SUBTST <<SUBR GET CSR INFORMATION FROM CONFIGURATION TABLE>> 
seannecnnabassetensasteessnnnsssenessesessoocssatescoseesee es 


; #SUBTEST SUBR GET CSR INFORMATION FROM CONFIGURATION TABL 
3 SECASHAEASSEAESERSESERESASASEEESESRELASEESEESAESESESESESESSESEESEESESEEEEEESEEEEEEEEEEEE 
;INPUTS : 
° 
;OUTPUT : CSRNO = CSR NUMBER 
; 
MOV BANKINDEX ,R2 ;GET INDEX INTO CONFIG TABLE 
MOV CONFIG(R2),R3 ;MOV IT INTO R3 
SWAB aS 3 
ASL R3 $ 
BIC @tC36,R3 ;CLEAR OFF SOME BITS 
HOV R3.CSRNO ;SAVE CSR NUMBER 


Ames les rl 


SEQ 0252 


—— 


Ee ee 





ee ee ce eee 
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CMDR. GET CSR INFORMATION FROM CONFIGURATION TABLE _ SEQ 0253 
9463 032610 PCONFIG:SUBTST <<SUBR PRINT CONFIGURATION MAP>> 
’ 3 SESSEAARSSASSEASSASSSSSSEASSSSSSSSASASESSSSASHSSEASSSAEEEASESESEEEESESESEEEHEEEEESEESD 
| ;#SUBTEST PRINT CONFIGURATION MAP 
| { SHASASSSEASESESSSASSEASSEHASESSEEESESSEESESSSSESEESSSEEESSESSESSESESSESESSSESEESESESEEES 
9464 032610 PUSH  TKVEC, TKVEC+2,RO 
| 032610 013746 000060 MOV TKVEC, -(SP) 
032614 013746 000062 MOV TKVEC<2, -(SP) 
032620 01 MOV RO, -CSP) 
9465 032622 010637 033222 MOV SP ,PCONFS ;SAVE LAST GOOD SP 
032626 012737 033170 000060 MOV @PCONF2, TKVEC 
9467 032634 012737 000 000062 MOV €340, TKVEC+2 
9468 032642 017700 147776 MOV a$TKB,RO ;KILL ANY OLD INTERRUPT 
9469 032646 042737 000 177776 BIC eBIT7.PSW ;LOWER CPU PRIORITY TO 140 
9470 032654 777 000100 147760 BIS @BIT6, O$TKS ;ENABLE KEYBOARD INTERRUPTS 
9472 032662 TYPE  MSGOO1 
032662 104401 065173 TYPEIT ,MSGOO1 
.OSABL CRF 
9473 032666 TYPE | MSGO02 
032666 104401 065255 TYPEIT ,ttsGoo2 
9474 032672 TYPE _MSGOO3 
032672 104401 065332 TYPELT ,ftsGoo 3 
9475 032676 022737 000060 002556 660, LASTBANK 
9476 032704 002006 NOOJ 
947 ;IF FAT PAPER ON TERMINAL GOTO 1$ 
9478 032706 IF @SW4 SET.IN @SWR THEN JUMPTO PCONF1 
032706 032777 000020 147722 BIT @SW4,aSUR 
032714 001 BEQ L323 
032716 000137 033130 SMP 
032722 L323:sssese 
9479 032722 012700 000074 NOOJU: MOV #60. ,RO 
032726 010004 MOV R4 
9481 0327 CLEAR R1.R3 
032730 005001 CLR R1 
032732 005003 CLR R3 
9482 032734 TYPE  ™SGOO4 
032734 104401 065437 TYPEIT fiscoos 
9483 032740 004737 033224 CALL‘ TCONFIG ;GO TYPE CONFIGURATION (1ST HALF) 
032744 022737 002556 CMP 060, LASTBANK 
9485 032 1 BGE CONF2 
9486 032754 TYPE CRLF 
032754 104401 002660 TYPEIT , $CRLF 
9487 032760 TYPE | _MSGO17 ;PRINT SPACE(S) 
032760 104401 066146 TYPEIT ,MSGO17 
_DSABL CRF 
9488 032764 TYPE _MSG11A 
032764 104401 065640 TYPEIT 2fSG11A 
9489 032770 TYPE $CRLF 
032770 104401 002660 TYPEIT 2SChLF 
9490 032774 TYPE | MSGO17 ;PRINT SPACE(S) 
032774 104401 066146 TYPEIT ,MSGO17 


nn enema 


A 


CVMJABO MSV11-J MEMORY DIAG. 
SUBR 


9491 
gage 


y 


SSSESSSSS 


SIKU UNrO 


= 


PRINT CONFIGURATION MAP 


033000 
033000 


033004 
033004 


033076 
033076 


033102 
033102 


104401 
104401 
104401 
104401 
012701 
010103 
004737 
022737 
002053 
104401 
104401 
104401 
104401 
104401 
104401 
104401 
104401 
104401 


012701 
010103 


065726 


002660 


033224 
000170 
002660 
066146 


066111 


002660 


002556 NOOJ1: 


PCONF 1: 
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TCONFIG 
#170, LASTBANK 
PCONF2 


*CCRLF 
CRF 


MSGO1i7 
MSGO17 


MSG118 
1 


#120. RO 
RO,R4 


R1,R3 





;PRINT SPACECS) 


;PRINT SPACEC(S) 


;PRINT SPACECS) 


;PRINT SPACECS) 


meee ee 


CLR Ri 
CLR RS 





SEQ 0254 


~~ —_ os 


9519 033142 
033142 

9520 033146 
033146 

9521 03351 
ossise 


9988 933156 
3 033162 
033166 


033170 
033174 
3202 


SE ssaa 


104401 


104401 


v 
Sten”? PR PRINT C CONF IGURA TON “MAP 


066130 


065726 


065437 





147440 


PCONF 2: wey 
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MSGO14 
MSGO14 


mmscolt 
CRF 


MSGO004 
MSGO04 


MSGO12 
MSGO12 


TCONF IG 

NOOJ1 

PCONFS , SP 
@BIT6,asTKS 
asTKB,RO 

RO, TKVEC +2, TKVEC 


; SPACE 


sRESTORE STACK 
;READ CHAR TO KILL FLAG 


MOV (SP)+,RO 
MOV (SP)+, TKVEC+2 
MOV (SP)+, TKVEC 


;STACK SAVED HERE! 


SEQ 0255 


————— 


SUBR PRINT C 


9535 033224 


9536 
9537 


93 


— ee ee 


a 
za 


S53 nbs 
a i 


J MEMORY 


ONF IGURA 


0127357 
104401 


032761 
001403 


104401 
000402 
104401 
701 
o77014 
0400 


01 
010301 


PION MAP 


000340 
065545 


177776 


002664 





cme ees 
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SUBTST <<SUBR TYPE CONFIGURATION>> 
eee eee yn eeaaaammaaamn 






;*SUBTEST TYPE CONFIGURAT 
3 SESESESSESSSSASSSSSSSSSESSSSSSSSSSSSSSSSSSSSSSSSSASESSSSSSSSSSSSSSHSEHSSSESESHESEDS ae 
P| [oe O° - crea ge gn" enagaaaaa £266464666 
;CALL: on, RO OF CHARACTERS 
; MOV RO.R4 + ACKUP 
; MOV eK RI s INDEX CONSTANT 
: MOV R1,R3S 
; CALL § TCONFIG VACTUAL CALL 
; RET s;ONLY RETURN 
3 SEAKESHASESSSSSSESSHSSSAESESASESSELESSESSSASESESSESASEAHEESEASSEEAEASESSEESESEEESEEESESESE 
3 2264864624686 
3#@ ERROR es 
3 #2206620 4866 
TCONFIG: MOV _ #340, PSU ;DISABLE INTERUPTS 
TYPEIT ,MSGOOS 
-OSABL CRF 
1s: gir @B1TO, CONF IG(R1) ; ERROR ON THIS BANK? 
3 - 
TYPE § MSGO13 ;PRINT "Xx" 
TYPEIT .MSGO13 
.D CRF 
BR 33 
2% TYPE M™SGO14 ;PRINT SPACE 
TYPEIT .MSGO14 
0 CRF 
3$ ADD 04,R1 ;BUMP POINTER 
S08 RO,1$ ;LOOP UNTIL DONE 
MOV R4.RO 
MOV R3.R1 


SEQ 0256 


| cess» hth hhh hansen nnn ln Srl nS ee 


— = ee .e e 


VMJABO MSV11-J 





ee eee 


MEMORY DIAG. 
TYPE CONFIGURATION 


012737 
112757 
104401 
005737 
993893 
00020 


010400 
010301 


104401 
033761 
016 


032705 
001404 
112737 
000403 
112737 


000403 
112737 


000403 
112737 
104401 


005737 


000340 
000040 
066132 


002372 
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3 $000060080006608 
3#@ INTERLEAVE ee 
3 $60466060066066606 


eee eee + 


sTHIS IS AN ENTRY POINT FROM ERROR REPORTS 


177776 TCFIGi: MOV #340 ,PSW 
066132 


TYPE 
TYPELT ,MSGO15 
IF NOTAB NE #0 THEN $RETURN 


MOV R4,RO 
MOV R3,R1 


§ $06266668664666666 


3;#@ MEMORY TYPE «es 
}$2066000060088086 


TYPE 
TYPEIT 
DSABL 


MSGO09 

MSGO09 

CPUBIT , CONFIGCR1) 
CONFIG+2(R1).R5 
@tC7,RS 

RS, 03 


BIT 
BEQ 
MOV 


002664 TCFIGe: 





SWAB 

BIC 

CMP 

BGT i7 

IF @#BITO SET.IN RS 
IF @BIT1 SET.IN RS 


066132 MOVB @‘P,.MSGO15 


ELSE 
MOVE #’E—,MSGO1S 

ENO 

ELSE 


#'P,.MSGO15 


BR 8% 

MOVE #' ,MSGO15 

TYPE MSGO15 

TYPEIT ,MSGO15 

. OSABL 

IF NOTAB NE @0 THEN $SRETURN 


066132 17%: 
8s: 





;DISABLE INTERUPTS 
MOV 


VE A BLANK IN TO BE PRINTED 


TST NOTAB 
BE@ L324 
RTS PC 
L324:ssssas 

;GET MEMORY TYPE 

;CLEAR yt INTERESTING whe? 

31S IT A LEGAL MEMORY TYPE 

;IF IF geeeese 


SO BR 
31S IT AN ECC MEMORY?77? 
BIT SEETO.RS 


31S IT A MSV11-P OR A MSV11-J777? 
BIT @#BIT1.RS 
BEG L326 
:IT IS A MSV11-P 
Lees BR L327 
;IT IS A MSV11-J hich ini 
L327 :ssssee 
BR L350 
L325:ssssss 
sIT IS A MSV11-L/P 


L3S0:ssssee 


TST NOTAS 





SEQ 0257 


ea eee > 
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SUBR 
033444 


$ 
Sef 


3450 


033456 010800 


SEEEEEESS 


st 


SSSSEES 
erbccoress 


033556 077035 
010400 


°o 
SoS 
~ 
° 
o 
~ 





TYPE CONFIGURATION 


170377 
000011 
000007 
0661 

066132 


MACRO YOS.02 Monday 07-Oct-85 16:57 Pege 2864-1 


066132 TCFIG3: # 


108: 
16%: 





.DSABL LSB 


3 eeeeeee06 
3;e@ CSR es 
600006006 
eehte 
éRe 





YPE 
TYPEIT 

OSABL 
@' ,4SGO15 
CONF IGCR1),R5 
#6IT1.R5 


16% 
@tC7400,R5 
RS 





15 
MSGO15 
. OSABL 
IF NOTAB NE @0 THEN $RETURN 


ADO 
SOB 
MOV 
MOV 


TYPE 
TYPEIT 


#4 ,R1 
RO, TCFIGS 
R4,RO 
RS,R1 


BE@ L331 
RTS PC 


L3Sisssssss 
sBUMP POINTER 
;LO0P UNTIL DONE 


sMAKE ASCII 

;PLUG INTO MEMORY 
TST NOTAB 
BEQ L332 


RT 
L332:ssssss 
;BUMP POINTER 


SEQ 0256 


- oe = -_— - 


; 
’ 


' 


2 
3 snes 


i 


we Ste 


ie 


104401 
105761 
12737 
104401 
000402 
104401 

701 


sre 
See 


066132 


11%: 


13%: 


148: 


15%: 
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| SUBR TYPE CONFIGURATION 


j Seesessesssesss 
3@@ PROTECTED es 
$0606080eSees 






10 
MSGO010 
CONF IGCR1) 


TYPEIT 
;BANK PROTECTED? 
3NO - SKIP 


sPRINT SPACE 


;BUMP POINTER 
sLOOP UNTIL DONE 


SEQ 0259 


ee ea “Aas A CO A CCC CCC CL LL LLL LLL LL LLL LL LLL LL LL LLL LL LLL LL LLL LLL LLL LLL LLL LLL LA A 
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ot -SBTTL TRAP PARITY ERROR HANDLER 
964 | PEOHERESESSEEESEESESESEESEEEEEEESEEESEEEREEEEEEAESEEESEEEEEEREDESESEEEOEEOEEEOEEE 


sVECTOR TO HERE FROM TRAPS TO 114 
IGNORE ERRORS BUT COUNT IF NOPAR FLAG = 1 


q . 
| SSHEHSESESESASSSESSSSSSSSSEEEASESSEAHESEASEESSESESASESESESEAESESESEHESESEHESEHEEEEESEESHES 


; CODE ACTION 





9644 
9645 
9646 
9647 
9648 
GH49 5 $m ~ 
96 ; 6 PRINT UNEXPECTED PARITY TRAP 
96 ; 1 COUNT ERROR 
96 ; 2 SET “ABORT” / SETUP “BADPC” / RETURN VIA PCBUMP 
36 : 3 RETURN VIA “PARTHERE” 
9655 022737 000001 002076 PARITY: CHP @1,NOPAR ;COUNTING PARITY ERRORS? 
96 00 rst BNE is :NO - SK 
3% 7 002072 INC PARCNT ;PARITY ERROR COUNTER + 1 
96 022737 000002 002076 i$: CMP @2,NOPAR ;ACTION CODE = 2 ? 
9660 001013 BNE ;NO - SKIP 
3661 SET ABORTFLAG ; YES 
012737 177777 002144 MOV #-1,ABORTFLAG 
9662 004737 034040 CALL § BADSTACK ;FIND BAD SP,.PC,PSW OFF STACK 
966 063716 002326 ADD PCBUMP , (SP) ; UPDATE RETURN 
9664 042766 000004 000002 Bic eBIT2,2(SP) ;SHOW FAILURE BY .NE. 
9666 737 000003 002076 2%: CMP @3,NOPAR ;ACTION CODE = 3 ? 
966 1005 BNE $ ;NO - SKIP 
9668 013716 002304 MOV PARTHERE , (SP) 
966 000002 RTI 
9670 004737 034040 3%: CALL BADSTACK ;FIND BAD SP,PC.PSW OFF STACK 
005237 002064 INC FATAL$ ;SCT FATAL INDICATOR 
104032 ERROR +32 





.OSABL CRF 


—_—<—-—— ee 





9704 
9710 
9711 034040 


9712 034040 


000001 
002070 
000001 


002034 
002070 
000001 


MSV1 ¥ DIAG MACRO YOS.02 
NON - EXISTANT MEMORY (HOLES) HANDLER 


002100 


002070 


ee ee 


Monday 07-Oct-85 16:57 Page 286 


-SBTTL TRAP NON-EXISTANT MEMORY CHOLES) HANDLER 
"yy. yy yy nenaeeeeememenaememmmmmammaaaaes 
sVECTOR T (SOMETIMES) FROM TRAPS TO 4 
; CODE IN NONEM DETERMINES ACTION AS FOLLOWS: 
s 1) IGNORE ERRORS BUT COUNT IF NONEM (NO NON -EXISTANT MEMORY) FLAG = 1. 
:; 2) TO EXIT PATTERN O DURING SIZING IF NON-EXIST MEM ERROR 


§ POSSESSES SSHSS SESS SHHHESSESSEEESSSHSESSEEESSSSESEESSHSESSESSSESHSESESOSSSEESSESSEESEDES 






NONEXIST: CHP 1 .NONEN COUNTING NON-EXISTANT MEMORY ERRORS? 
INC NEMCNT {BUMP _NON-EXISTANT MEMORY COUNTER 
CHP 01, NEMCNT iE IRST ERROR? 
BNE 18 SKIP 
eA HOV RO. ADDRESS ASSUME RO CONTAINS THE ADDRESS ACCESSED 
28: INC NEMCNT BUMP NON-EXISTANT MEMORY COUNTER 
nov #1,Ri ‘DUMMY UP R1 FOR A FORCED SOB EXIT 


me s ae. “x. % £7 eee 
. SBT —— (TRAP TO 4) HANDLER 
TIMEOUT: CALL FIND BAD SP,PC.PSW OFF STACK 


eae ;SET FATAL INDICATOR 








ee  & we  - -e EE CY” penne 
. SBTTL MANAGEMENT (TRAP TO 250) HANDLER 
MMTRAP : CALL sFIND BAD SP,.PC,PSW OFF STACK 


;SE1 FATAL INDICATOR 





7 
FATAL$ 
7 






CRF 
TRAP RESERVED INSTRUCTION HANDLER 


PDP1105:CALL BADSTACK :FIND BAD SP.PC.PSW OFF STACK 
FATALS ;SET FATAL INDICATOR 
+ 
-OSABL CRF 


BADSTACK:SUBTST <<FIND BAD SP, PC, & PSW FROM STACK>> 


 easadsansnsasscanessgonacsensosnsssesseeenecsoooooneeeceooesenconcoseoleeeesee 


j PERSSSESHSESSESSESSSESOSSSESSAESHESHSESEAESSSSESESESSSSSHEESESSESSESSESSSSSSSESSESSS 





ADD 
MOV 
MOV 


———— nn -_—_— 


SEQ 0261 


—- <— 


ee Al. A AOC A CC LLL LL LL LL LL LE LLL LL AL LLL LL LLL — — eee 
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A TT 
. — 











TRAP KERNEL TRAP HANDLER SEQ 0262 
9719 SBTTL TRAP KERNEL TRAP HANDLER 
97 § POSSESS SESESESEESSSEEEEEESESESESEESESEEESSESESESOEEHESESHESESESEEHEOEEESEESESEOESE 
972 5 A TRAP THAT COMES HERE 
os | SESOSSSSESSESEHESESSESEEEESSEEESESESESESESSSEEHSESEESESESESESEEESESESEHSOEESEOSEES 
4 ° 
9724 034970 042766 140000 000002 %sKERNEL: BIC #140000, 2( SP) 
9725 034076 000002 RTI 
|_|“. 
.SBTTL TRAP ENERGIZE TRAP HANOLER 
9726 034100 052737 000001 177572 tENERC?7E:BI5- @BITO,MMRO 
9729 034106 900002 RTI 
, SERSSEHEEESESESESASSESESEEESSESSESEESEEEESSESELESESEEESSSSESEESEESESSSASESESSEHSEHESES 
731 .SBTTL TR ENERGIZE TRAP HANDLER 
9732 034110 042737 9000001 177572 SDEENERGIZE :BIC @BITO,MMRO 
97335 034116 000002 RTI 
734 § SRSSSESESSHSSSEEESAASSAESESEEESE EEE SESSESRSSEEEEESESESESEEESESSESESESESESSESEEEEOEEE 
97 .S8TTL TRAP RAP HANDLER 
9736 034 005737 002544 $CACHN: TST Cac :IS a A CACHE 
ore ons Fg oes BEG : 
dt. Be eetas Ci3737 002544 177746 MOV CACHKN , CONTRL ;SE TUP CACHE AS PER CONSTANT CUSUALLY 1 = FULLY ON) 
4 + ot ped 737 000001 177746 oa, ats @B81T0, CONTRL ;OISABLE TRAPS (BUT NOT ABORTS) 
dy i EE 
dips .SBTT TRAP CACHOFF TRAP ER 
9743 034144 005737 002544 $CACHF: TST CACHKN - THERE A CACHE? 
9744 150 001405 i$ ha - RETURN 
9745 _— TRAPS (NOT ABORTS), FORCE MISSES, FLUSH, BYPASS 
dip one ise 053737 002550 177746 Is CACHKF , CONTRL 
9747 034160 000002 18: 


——— — 


<r A A CC CCl lL LLL LLL LLL LLL LLL LLL LL LLL LLL LL LLL LLL LLL LLL LLL LLL LLL LLL - 
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TRAP LOAD CSR TRAP HANDLER SEQ 0263 
9750 _SBTTL TRAP LOAD CSR TRAP HANDLER 
9751 ;LOAD CORRECT CSR WITH DATA IN CSR 
9 PROGRAM CSR" S ASSERT INHIBIT MODE POINTER WHEN LOADED 
9753 034162 $LOADC: PUSH RO. R1 SAVE REGISTERS 
034164 010146 Ri, -(SP) 
9754 054166 013700 002152 MOV CSRNO,RO CREATE ugse ADDRESS 
9755 034172 IF INHECC IS TRUE THEN GOTO 3$ ;DON’T T INH. MODE POINTER ON 
34172 005737 002536 TST INHECC 
034176 00 921 3$ 
9756 0 0087 002532 TST PGMCSR ;PROGRAM IN INTERLEAVED SPACE? 
9757 0 100007 BPL 18 ;BRANCH IF NOT 
9758 0 113701 002533 MOVB $$ PGMCSR+1,R1 ;CHECK SECOND CSR 
9759 034212 042701 177740 BIC @tC37,R1 CLEAR UNNECESSARY eITs 
9760 034216 020137 002152 CMP Ri, CSRNO ;IS THIS THE CURRENT CSR? 
9761 0 001404 BEQ 23 ;BRANCH IF IT IS 
97 224 123737 002532 002152 1%: CMPB  PGMCSR,CSRNO iT3 THIS THE CURRENT CSR? 
9763 0 001003 BNE 3$ 
9764 034234 052737 020000 002150 2%: BIS @B1IT13.C ‘SET THE INHIBIT MODE POINTER TO 1ST 16K 
9765 034242 C13760 002150 172100 3%: MOV CSR, CSAADDCRO) ;LOAD THE 
9766 0 POP R1,RO ;RESTORE REGISTERS 
0 012601 MOV (SP)+,R1 
0 012600 MOV (SP)+.RO 
9767 034254 000002 RTI 
9769 _SBTTL TRAP READ CSR TRAP HANDLER 
9770 ;READ THE CORRECT CSR INTO LOCATIONS CSR 
9771 034256 $READC: PUSH RO 
034 010046 MOV RO, -(SP) 
9772 034 013700 002152 MOV CSRNO,RO 
9773 0 016037 172100 002150 MOV CSRADO(RO),CSR ;READ IT 
9774 034272 POP RO 


0342 012600 MOV (SP)+,RO 
9775 034274 000002 RTI 


EE - 


. _— + +e 


Feap Ae? FExb cai e READ CSR C 


9777 


9778 034876 


9779 0 
3780 ye ot tH} 


010210 
053737 


140000 
002150 
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AREFULLY 


002152 


177776 


177776 


$TSTRD: 


i$: 


TSTRO1: 


-SBTTL TRAP TEST (R1) € READ CSR CAREFULLY 
PUSH RO,R2,R5 
MOV @CSRADD , RO ;CREATE CSR ADDRESS 
ADD CSRNO,RO 
CLR Re 
TST PGMCSR 
BPL i$ 
MOVB PGMCSR+1,R3 
BIC @BIT7,RS 
CMP R3,CSRNO 
BEQ 2s 

CMPB PGMCSR , CSRNO 

#61IT13,R2 

CALL TSTRO1L 
bap SINGS — ONLY - SET CARRY BIT 


IF @BIT4 SET.IN CSR AND @BIT1S OFF.IN CSR 


eee _ _——— 


BIT #BIT4.CSR 
BEQ L 

BIT #B1T1S5.CSR 
BNE L335 


BR L334 


L333 :sssses 


L3S4:ssssss 


BIS #BITO,2(SP) 
ELSE 

BIC ¢#BITO,2(SP) 
END ;OF IF @BIT4 
RTI 
MOV R2,(RO) : 
TESTAREA 
BIS TESTMODE , PSW 
0 CRF 
TSTB ~—s-_« CR'1) : 
BIC @81T15!B1T14,PSW : 
MOV CRO),CSR : 
RETURN ; 


;GO TO SYSTEM TEST MODE 


SEQ 0264 


7 EE ———— - 


— — 





—_— eee ae eo - 
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9609 
9810 034456 
034464 
9812 034470 
gts333 
34502 
34504 
12 


oo ° 


© 200 © 
SSS SF 
4 


34532 


+3 
& § 


eusescensgastgeeessssss 
see 
rag 


s2 
ae 
o 

Se 


& 

o 
o°°0° 

- 

Ww 

~ 

ks 


os 


e] 0 
034616 
034620 


StEcee 


012737 
004737 


234235 
000002 
012737 
004737 
012737 
104425 


012737 
004737 
c00002 
012737 


104425 
000002 


04373) 


peed dd 


013737 
052737 
104425 
000002 


000002 
035202 


602150 


002150 


002150 


002150 


002150 


002150 


002150 
002150 


002150 
002150 


.SBTTL TRAP ECC DISABLE ALL CSR‘S TRAP HANDLER 
sECCDOIS: MOV #681IT1.CSR 

cat CSROUT 

.SBTTL TRAP ECC DISABLE OF 1 SELECTED CSR TRAP HANDLER 
s€CC1OIS ROY #8IT1,CSR 

aI 

.SBTTL TRAP INITIALIZE ALL CSR’'S TRAP HANDLER 
sECCINIT : MOV @BITO,CSR 

at CSROUT 

.SBTTL TRAP INITIALIZE 1 SELECTED CSR TRAP HANDLER 
sECCLINIT: MOV #BITO,CSR 

ATT 

.SBTT TRAP ENABLE SBE PARITY TRAPS ON ALL CSR’'S 
SENASBE : MOV #BITO!BIT1.CSR 

_ CSROUT 

. SBT TRAP ENABLE SBE PARITY TRAPS ON 1 SELECTED CSR 
es @BITO!BIT1.CSR 

RTI 

.SBTT TRAP WRITE CHECKBITS THRU ALL CSR‘S TRAP HANDLER 
$CBCSR: MOV CHECK CSR ;sBITS 11-5 

BIS #BIT1!:8IT2,.CSR ; CHECK 

oa CSROUT 

.SBTTL TRAP WRITE CHECKBITS THRU 1 SELECTED CSR TRAP HANDLER 
$CBiCcSR: MOV K,CSR ;BITS 11-5 

BIS con OBITL'BIT2, CSR ; CHEC 


L 
RTI 


SEQ@ 0265 


— -——— 


LL 
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9845 .SBTTL TRAP WAS THERE A SBE ON ANY CSR TRAP HANDLER 
98646 034622 $WASSBE : PUSH R1,R4 
34622 010146 MOV R1,-CSP) 
034624 010446 MOV R4,-CSP) 
9647 0 013701 002224 MOV TOTCSRS,R1 ;GET CSR'S BYTE 
9848 0346 005004 CLR R4 
9849 034634 BEGIN LWSBE ass 
EERE 
9850 034634 FOR CSRNO := #0 TO #36 BY #@2 
034634 005037 002152 CLR CSRNO 
034640 BS7:sssass 
9651 0 006301 ASL 
ess 9 103910 ee BCC L335 
9653 Osaeaa 104426 READCSR 
9654 034646 IF @BIT4 SET.IN CSR 
034646 032737 000020 002150 BIT @BIT4,CSR 
034654 001403 BEQ L336 
9855 034656 SET R4 
034656 C12704 177777 MOV #@-1,R4 
9856 opeaes 000413 LEAVE LWSBE on ues 
9857 Oeaeea END ;OF IF @BIT4 
L3356:sssses 
9658 034664 END ;OF ON.ERROR 
L3a5S:ssssas 
9859 034664 IF Ri EQ 60 THEN LEAVE LWSBE 
034664 005701 TST Ri 
034666 001407 BEQ E56 
9860 034670 END ;OF FOR CSRNO 
034670 062737 000002 002152 ADD #2,CSRNO 
034676 023727 002152 900036 CMP CSRNO, 636 
034704 003755 BLE 857 
034706 ES7ssssssss 
9861 034706 END LWSBE 
034706 ; ES6:ssss33 
pt ath 006004 ROR R4 :SET C BIT FOR ERROR 
034710 POP R4,R1 
Sane suet Se ES} 
+. 
9864 034714 ON. ERROR 
034714 103004 BCC L337 
9865 034716 052766 000001 000002 BIS #@BITO,2(SP) 
9866 034724 ELSE 
034724 000403 BR L340 
034726 L337:sssaas 
9867 0347 042766 000001 000002 BIC #BITO,2CSP) 
9868 0347 END ;0F ON.ERROR 
034734 L340:isssea 
9869 034734 000002 RTI 


ee - 


ee 
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9670 .SBTTL TRAP WAS THERE A SBE IN 1 SELECTED CSR TRAP HANDLER 
98671 ;0N RETURN IF CARRY IS SET THERE WAS A SBE 
98672 034736 104426 $WAS1SBE : READCSR | 
9873 034740 042766 000001 000002 BIC @BITO,2CSP) ;CLR C BIT ON STACK 
9874 034746 032737 000020 002150 BIT @BIT4,CSR 
9675 ys oft 00140 BEQ 1 
9676 034 052766 000001 000002 BIS @BITO,2¢CSP) ;SET C BIT ON STACK 
9677 034764 900002 1%: RTI 
eS ~ 





SEQ 0267 


—— 


CVMJABO MSV11-J ME 
TRAP WAS THERE 


9681 034766 
o3a770 
034772 

9683 034776 

9884 98 0C 

9885 935006 
0 a. Be | 
tire: 

9886 0350¢ 

9887 0350¢ 
# ss 

388 os5012 
sie 

9890 035022 
0 7 

9891 035026 
08 ; 

9892 03503¢ 
035030 

9893 9 tf 

9894 035¢ 
035¢ 
0 ‘ 

9695 035¢ 
035034 
0 " 
si 

9896 0 5054 

9897 035052 

9896 8 50° 
0 ‘ 

9899 03506¢ 

9900 035¢ 

9901 035070 
035070 
0 o78 

9902 03507 

9903 035100 
035100 

9904 035100 


010146 
010446 
013701 
005004 


MORY DIAG 
A DBE ON 


002224 


002152 


100000 


177777 


000002 
002152 


002150 


002152 
000036 


.SBTTL TRAP 
R1,R4 


$WASDBE : PUSH 


MOV TOTCSRS ,R1 
CLR 
BEGIN LWDBE 
FOR CSRNO 
ASL Ri 
ON .ERROR 
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;GET CSR'S BYTE 


:= #0 TO #36 BY 2 


READCSR 
IF @BIT15 SET.IN CSR 


SET R4 
LEAVE LWDOBE 


END ;OF IF #BIT4 
END ;OF ON.ERROR 


IF R1 EQ @O THEN LEAVE LWOBE 


END ;OF FOR CSRNO 


END LWOBE 
ROR R4 
POP R4,R1 
ON. ERROR 

BIS #@#BITO,2(SP) 
ELSE 

BIC #BITO,2¢SP) 
END ;OF ON.ERROR 
RTI 


;SET C BIT FOR ERROR 


WAS THERE A DBE ON ANY CSR TRAP HANDLER 


B60:ssssas 
CLR CSRNO 
B6lsiisssas 
BCC L341 
BIT #BIT15.CSR 
BEQ@ L342 
Mov @-i ~R4 
BR E60 
L342:isssas 
L34l:issses 
TST Ri 
BE@ E60 
ADD #2,CSRNO 
CMP CSRNO, 636 
BLE 861 
E6lssssssss 
E60: ssssss 
MOV (SP)+,R4 
MOV (SP)-+-,R1 
BCC L345 


BR L344 
L343 :isssss 


L344:isssee 


SEQ 0268 


oe ee eee - 


CVMJABO Case 
TRAP 


Sse Sasi 


9910 0 


SH Siete 


eR Ae oat MACRO YOS.02 
A DBE ON i SELECTED CSR TRAP 
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-SBTTL TRAP WAS THERE A DBE ON 1 we hm CSR TRAP HANOLER 
:ON ~ 3 IF CARRY IS SET THERE WAS A DBE 


104426 $WAS1DBE: :READC 
TST 


005737 002150 
00004 

766 000001 000002 
000002 
042766 000001 000002 3%: 
000002 


BPL 3$ ;NO - SKIP 
att @BITO,2¢CSP) ;SET C BIT ON STACK 
Br¢ #BITO,2CSP) ;CLR C BIT ON STACK 


SEQ 0269 


CVMJABO MS 
TRAP 


9916 

9917 98 1 
] 

99186 035136 


3920 035142 
i sie 
44 


—— ee oe . 


035170 
035176 
03 


el 


Y OIAG. 
CLEAR “ALL ECC CSR‘'S TRAP 


005037 
004737 


005037 


i 


052737 
004737 
000002 


052737 
104425 
c00002 
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-SBTTL TRAP CLEAR ALL ECC CSR’'S TRAP HANOLER 
150 $CLRCSR:CLEAR CSR CLR CSR 
035202 cmt CSROUT 
-SBTTL TRAP CLEAR 1 SELECTED CSR TRAP HANOLER 
$CLRICSR:CLEAR CSR 
002150 CLR CSR 
yore 
-SBTTL TRAP ECC DISABLE, CHECK MODE, & WRITE CHECKBITS IN ALL CSR‘'S TRAP nee 
CHE TS ALREADY IN LOC “CSR” 
000006 002150 sCHKDIS : BIS #6IT1!:681T2,CSR ;ECC DISABLE € DIAG CHECK MODE 
035202 poet CSROUT 
-SBTTL TRAP ECC DISABLE, CHECK MODE, & WRITE CHECKBITS IN 1 SELECTED CSR 
;CHECKBITS ALREADY IN LOC “CSR” 
000006 002150 sCHK10IS:BIS @BITi!:BIT2.CSR ;ECC DISABLE € DIAG CHECK MODE 


L 
RTI 


ee er ee 


VMJABO MSV11-J MEMORY DIAG. MACRO YOS. 
| FRAP E *SISABLE. CHECK MODE, € WRITE CHECKBITS 


9936 035202 


2 <e ee ee —_ 


010146 
013701 002224 


005037 002152 
006301 


737 000002 
023727 002152 
003764 





002102 
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1 SELECTED 


CSROUT: SUBTST <<SUBR WRITE IN ALL CSR‘S>> 


§ SSSSESSSEHSSSSSSASSESESSESESESSSSHSSESSSESESHESSESSSEEEEEES 8O2646666466666646664666666 


3 *SUBTEST SUBR WRITE IN ALL CSR‘S 
acai: «=Car ane seeenrecmmmonmuaeneamennneeennmnnaee 
MOV Ri. -CSP) 
MOV TOTCSRS,R1 ;sGET CSR’‘'S BYTE 
BEGIN LCSROUT 
B62:isises 
FOR CSRNO := #0 TO #36 BY ¢2 
CLR CSRNO 
B6S:isssss 
ASL RL 
ON .ERROR 
BCC L345 
LOADCSR 
END ;OF ON.ERROR 
L34S:sissas 
IF Ri EQ #0 THEN LEAVE LCSROUT 
TST Ri 
BE@ E62 


END ;OF FOR CSRNO 





ADD #2,CSRNO 
CMP CSRNO, 036 
BLE 865 
EGS:sssssss 
END LCSROUT 
EG2:isssc% 
POP Ri 
MOV (SP)+-,R1 
RETURN 
SINVALIO: SUBTST <<TRAP INVALIDATE BACKGROUND PATTERN>> 
| SOROSSASSEKESESAEREEEEEESFEEEEEEEESEALESEESESEEESEEEEEEEEEDEEEEEEEEEESEEEEESESS 
3; #SUBTEST TRAP INVALIDATE BACKGROUND PATTERN 
| CHOSSAREASSSESSEEEHESEESFESESEEESESESHESESESEESDESESESEESSEEEEEEEEEESESEEESEEOEES 
MOV RO, -CSP) 
MOV Ri. -(SP) 
MOV BANK ,R1i 
ASL Ri 
ASL Ri 
BIC @68IT13,CONFIG+2C(R1) 
POP R1,RO 
MOV (SP)+,R1 
MOV (SP)+,RO 


—— ————! . 
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9960 035500 





73 
013700 





SUBTST<< TRAP GENERATE AND TEST ERROR ADDRESS>> 


| COOSSSESSESEEESEESESESESESEESSESESSSESEESSEESOSSSSSSESESSSESSSESHSSESSEESESESOES 
T TRAP TE AND TE 


3 *SUBTE 


Ss 
’ SESSSHESSSSSSASSAESSSSSSHSSSSESSSSSSSSESSSSSSSSSSSSSSSESHESSSSHSSSESSSESSSSSSESEES 


SH 
as 


172100 
172100 


gteRes 


ot Od 
oOma=z 





is 0) 
- 
o 





See 
88 
~4 


oo be, 34~wD 
lad neZnr 
Se o-am4n 


ae 
on 


Za 
~4 


1.R0 ADO 
ERROR’ ADDRESS FROM CSR UNDER TE 










aBBaEY ERP 


RO.R1,R2,RS 


MOV RO, -(SP 
MOV Ri, -(SP 
MOV R2,-CSP 
MOV RS, -CSP) 

BANKINDEX RS 

6% 

os ;GENERATE WHAT ERROR ADDR SHOULD BE 

UIPARS ,RO 

@-5,R0 

EQFLAG 

is 

@tC177,RO 

ty ;GET CURRENT ADDRESS BITS 11 AND 12 

Ri 

Ri 

@rC2,R1i 


THEN TO THE ADJUSTED PAR VALUE 
cSR.R1 
6-5.R1 
@tci77,R1 
NO228I1T :IS THIS AN 11/63,11/23-8 OR 11/23 ? 
2% ;BRANCH IF NOT NECESSARY 
EGFLAG iZ IT E68 i 
RO SAVE GENERATED ERROR ADORESS 

MOV RO, -(SP) 
CSRNO,R2 :GET CSR 
681714, CSRADO(R2) ; TURN OM IT _CAREFULLY 
ST Tie. CERADOC RE) hi Tuaw Orr E@B BI 
tC 740.RO rr tae eit SUT. ERROR ROR ERROR ADOR 
SHIFT ADOR BITS 18-21 INTO POSITION 
- TO CURRENT ERROR ADORESS 












RO 
RO,R1 
RO 








COMPARE REAL AND GENERATED ERR. ADDR 
\GRANCH IF THEY ARE THE SAME 

3 EAVED? 

‘NO - ME HAVE AN ERROR 

64K INTERLEAVED MEMORY? 





5 SE, Ee **- 


SEQ 0272 
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1 03 


19888 gunn 
Sie Sh 
on 


a: 

| 10012 0 3546 

| 40014 035550 
19046 + 3 33 
iooig 0 


10020 035566 


10021 035566 
10Oss O8 035572 


10034 O83 2 


104462 
010137 
005037 


002460 
002066 


002150 
000004 


002150 
040004 


002150 


002150 





PERR36 ;ELSE PRINT ERROR ADDRESS ERROR 
S$: MOV R1,ERRADD ;SAVE CSR'S ERR 
CLR SKPERR E THE ERROR PRINTOUT AGAIN 
POP R3,R2,R1,RO IRESTORE REGISTERS 
MOV (SP +. RS 
Mov (SP Re 
MOV (CSP)+,R 
MOV (SP)+,RO 
RTI 


$CBREG: SUBTST <<TRAP ENAP_E CHECKBIT REGISTER>> 
Se ee «<x x _—_——ccccccee 


;*SUBTEST CHECKBIT REGISTER 


ee 


CLR CSR 
61S eBIT2,CSR ;ENABLE DIAGNOSTIC MODE 
—_ sLOAD CSR REGISTER 

i 


$SYNREG: SUBTST <<TRAP ENABLE SYNDROME BIT REGISTER>> 


§ SSRSSKSESESESSS SEAESASESEEESASESESESSEESSSESESESASSSESESSSSSESEESESESSSSESSESESEESESE 


 eSUBTEST TRAP ENABLE SYNDROME BIT REGISTFR 
ee 
BIS $81714!B1T2.CSR ENABLE DIAGNOSTIC 
LOADC ‘LOAD CSR REGISTER 


RTI ; 


SEQ 0275 


rd 


C—O TE A TE TT TT eT 
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MACRO YOS.02 
E SYNDROME BIT REGISTER SEQ 0274 








10028 035604 SUBTST<<SUBR § MAPPER>> 
{ SSSSSSSSSSSSSESSESESSSSSEESHSSSSSSEESEASESESESESESESSESESEESSESESESEESESESESESSEOEEE 
; «SUBTEST SUBR R 
ee a a a a. 1. a} 
1 ;THIS SUBROUTINE MAPS THE MEMORY BANK (16K WORDS = 1 BANK) 
100 sIN R3 TO THE TEST PATTERN AREA (SUPERVISOR VIRTUAL "60000 - 157777) FOR 
100 i ;THE 11/83 ; USER VIRTUAL (60000 - 157777) FOR ALL OTHERS 
, 
1003 ; 
10034 ;CALL MOV BANKNO,R3 ;SET UP BANK ARGUEMENT 
10035 ; CALL MAPPER s;ACTUAL CALL 
190 , RETURN ;ONLY RETURN 
10038 :SET SUPERVISOR/USER UP FOR 1 TO 1 MAP 
10039 035604 MAPPER: PUSH  RO,R1,R2.R4,R5 
035604 01 MOV RO, -(SP) 
035606 010146 MOV R1.-(SP) 
035610 010246 MOV R2. -(SP) 
035612 010446 MOV R4,-(SP) 
035614 ©10546 MOV RS, -(SP) 
10040 0 012700 172340 MOV @KIPARO,RO ‘FIRST AREA TO MAP TO 
10041 03 012701 172240 MOV @SIPARO.R1 ;FIRST ADORESS REGISTER 
1 03! 012704 172200 MOV @SIPORO.R ;FIRST DESCRIPTOR REGISTER 
10043 0356: 737? 002456 TST NOSUPER ;CAN WE USE SUPERVISOR MODE? 
10044 03% 001404 BEQ 43 ;YES, BRANCH 
10045 0 > 012701 177640 MOV @UIPARO,R1 ;FIRST ADDRESS REGISTER 
10046 0 012704 177600 MOV @UIPDRO.R4 ‘FIRST aDESCRIPTOR REGISTER 
10047 03' 30 012702 077406 4s: MOV 677406 ,R2 ; CONSTAN PAGE, UP, R 
10048 03% 127 10 MOV 08. COUNTER. 
10049 0 > 012021 i$: MOV (RO}+,(R1)> ;PUT IN SUPERVISOR ADDRESS 
1 0 o1 MOV R2,(R4)> ;PUT IN SUPERVISOR DESCRIPTOR 
1 0 077503 S08 is LOOP TILL DONE 
1 03° 012741 177600 MOV #177600, -(R1) ; CORRECT CAST FIELD FOR PERIPHERALS PAGE 
1 035672 012741 177400 MOV #177400, -(P1) 
1 035676 022737 5 004064 30%: CMP #5, PROTYP :IS THIS A 11/73/83/84? 
10055 035704 001 BNE 40$ : IF NOT 
1 035706 012704 172206 MOV @SIPDRO+6,R4 ;POINT TO PDR 3 
10057 035712 012705 000004 MOV 04. RS ; COUNTER=4 
1 035716 724 100000 353: eIs @BIT15,(R4)+ ;SET UNCONDITIONAL CACHE BYPASS IN POR3-6 
i 035722 077503 S08 RS, 35$ 
10060 ;SET UP SUPERVISOR/USER FOR TEST AREA 
10061 035724 022703 000200 40s: CMP 2200 ,.R3 ;MAP NOTHING (1 TO 1)? 
1 035730 001516 BEQ 3$ svES - 
1 035732 072327 000011 ASH 29. .R3 ‘BANK 1 STARTS AT 100,000 LESS 6 LSB’S 
10064 3F Y MANAGEMENT = 1000 
10065 Os 736 012701 172246 MOV @SIPARS,R1 ; SETUP FOR. AUTO INCREMENTING 
10066 035742 737 456 TST NOSUPER ;D0 WE HAVE SUPERVISOR MODE? 
10067 035746 001 BEQ $ ;YES - BRANCH 
10068 0 730 012701 1/7646 MOV @UIPARS,R1 ;SETUP FOR AUTO INCREMENTING 
10069 0 012702 S$: MOV R2 ; COUNTER 
10070 035760 010321 2$: MOV R3.(R1)- PLUG IN PAR INFO 
10071 035762 062703 000200 ADO 6200 ,R3 ;BUMP ADDRESS 4K 
10072 035766 077204 SOB R2,2$ {LOOP TILL DONE 
10073 035770 005737 002240 TST SPLTCSR 
10074 035774 001442 BEQ 98 
10075 035776 162701 000010 SUB #10,Ri 
0076 0 010102 MOV 1.R 





- —_—-- = 


CVMJABO MSV11-J MEMORY 
MAPPER 





0446 
013737 
005000 
012701 


000177 
002456 
177652 
172252 


172354 
172%40 


-— ee ~ 


602240 


002556 


002102 


002102 


177654 
172254 


036306 


108%: 


$KMAP : 


——— a ee a 


SEQ 0275 

ADD R2 

CMP #1.SPLTCSR 

BEQ 0$ 

MOV R2,RO 

MOV R1i,R2 

MOV 0,R1 

MOV (R1)+,CR2)+ 

MOV (R1),CR2 

MOV BANKI ' 

TST INT64K 

BEQ 11$ 

MOV 4000, RO 

BR 12$ 

MOV #10000, RO 

TST NOSUPER 

BEQ 133 

MOV @UIPARS,.R1 

BR 14% 

MOV @SIPARS,R1 

ADD RO, (R1)+ 

ADD RO. (R1) 

IF we HAVE AN 124K SySTEn WE DON’T WANT TO TEST THE 

;LAST 4K, WHERE THE Q-BUS DE Ice PAGE IS. INSTEAD, THE 

: WILL REMAP THE CAST aK TO 8-12K. ALSO, IF THERE 

;IS A BANK 177 ON AN 11/83, THE PROGRAM WILL REMAP THE LAST 

4K TO 8-12K FOR T REASON. 

éMp 27. LASTBANK 

BNE 7$ 

TST NO22B1T ;11/83,11/23-8 OR 23? 

BEQ 3$ ;BRANCH IF SO 

CMP 07 ,BANK ;BANK 7? 

BNE 3$ ;NO - BRANCH 

BR Bs 

CMP #177, BANK 

BNE $ 

TST NOSUPER 

BEQ 63 

MOV UIPARS , UIPARG 

MOV SIPARS, SIPAR6 

POP R5.R4.R2.R1,RO 
MOV (SP)+.RS 
MOV (SP)+.R4 
MOV CSP )+,R2 
MOV (SP)+,R1 

i MOV (SP)+,RO 

_SBTTL TRAP §$ MAP KERNEL (ALMOST 1 TO 1) TRAP HANDLER 

PUSH  RO,R1,.R2.R3.R4 
MOV RO, -(SP) 
MOV Ri, -CSP) 
MOV R2, -(SP) 
MOV R3,-CSP) 
MOV R4,-C(SP) 

MOV KIPAR6 , SVKPAR6 

CLR RO :1ST AREA TO MAP TO 

MOV @KIPARO.R1 ;FIRST ADDRESS 


EL ee ee — 
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TO T) TRAP AMLER - 


MAP KERNEL CALMOST 1 SEQ 0276 

10124 036230 012702 077406 MOV #77406 ,R2 ;CONSTANT FOR 4K PAGE,UP .R/W 

10125 036234 012703 172300 MOV @KIPDRO.R3 :1ST PAGE DESCRIPTOR REGISTER 

10126 036240 012704 000010 MOV 08. .R4 ; COUNTER 

10127 036244 010021 18: MOV RO.(R1)> | ;PUT IN KERNEL ADORESS 

10128 036246 010223 MOV R2.(R3)« ;PUT IN KERNEL DISCRIPTOR 

10129 0 062700 000200 ADD #200 ,RO ; ADD ADDRESS CONSTANT FOR 4K CHANGE 

130 0 S08 R4,18 :LOOP TILL 

10131 0 012741 177600 MOV #177600, -(R1) ; THE PERIPHERALS PAGE TO KIPAR7 

101 036262 012741 177400 MOV #177400, -(R1) ‘AND NEXT LOWER PAGE TO KIPAR6 

10133 0 01.711 036306 MOV SVKPARG. (R1) 

10140 036272 POP R4,R3,R2,RN1,RO 

036272 012604 MOV (SP)+.R4 

036274 012603 MOV (SP)+.R3 
036276 012602 MOV (SP)+_R2 
0 012601 MOV (SP)+.R1 
036302 012600 MOV (SP)+.RO 

10141 036304 000002 RTI 

10142 036306 000000 SVKPAR6:.WORD 0 5:K SAVE THE XXDP V2 KPAR6 POINTER HERE 


—- asm oe -— 
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COO eee ber i TO 1) TRAP HANOLER - SEQ 0277 
10145 036310 RELOCATE:SUBTST <<RELOCATE PROGRAM>> 
| PRSEREREAAEEEEEESEESEESSEESESESESEEERESEEESESEESEEEEESERESESESS SEEDED EESEDESOES 
3; *SUBTEST RELOCATE PROGRAM 
| PAAEAEREREEEEEEESEDESERERESERESEERESEEREEEEEEREEESEEEESESEEEROREESEEEEOESEEDEDSE 
10146 036310 IF @SWi2 SET.IN @SWR THEN SRETURN ERROR 
036310 032777 010000 144320 BIT #SWi2,a8SWR 
036316 001 BEQ L346 
036320 000 SEC 
036322 000207 RTS PC 
36324 L346: sss333 
10147 036324 IF APTFLAG IS TRUE OR ACTFLAG IS TRUE 
36324 005737 002352 TST APTFLAG 
036330 00100 BNE L347 
036332 005737 002350 TST ACTFLAG 
036336 1 @ L350 
036340 L347:ssssss 
10148 036340 IF $PASS NE #0 THEN $RETURN ERROR 
036340 005737 056724 TST $PASS 
036344 001402 @ L351 
036346 C00261 
036350 000207 RTS PC 
036352 L351i:ssssss 
10149 036352 END; OF IF APTFLAG 
36352 L350:ssssss 
10150 036352 BEGIN LOADERBANK 
36352 B64: 553533 
10151 036352 FOR BANK := @1 TO LASTBANK 
036352 012737 000001 002102 MOV #1.BANK 
360 B65S:sissse 
10152 036360 004737 037760 CALL EXBANK 
10153 036364 IF ACFLAG IS TRUE AND PFLAG IS FALSE AND BMFLAG IS FALSE 
036364 005737 002116 TST ACFLAG 
036370 001431 BEQ@ L352 
036372 0057 002122 TST PFLAG 
036376 001 BNE L352 
0 005737 0021350 TST BMFLAG 
0 00102 BNE L352 
10154 0 013700 002102 MOV BANK ,RO 
10155 036412 010037 002432 MOV RO, LOADBANK 
0156 036416 013701 257 MOV LOADHOME ,R1 
10157 036422 004737 037350 CALL BANKMOV 
1 036426 004737 037702 CALL NEWL ;MAP NEW LOADER BANK IN KERNEL 
10159 036432 013701 002104 MOV BANKINDEX,R 
0160 036436 052761 100000 002666 BIS @6IT15,CONFIG+2(R1) ;MARK LOADER 
10161 036444 042761 020000 002666 BIC #B1T13,CONFIG+2CR1) ; INVALIDATE BACKGROUND PATTERN 
10162 036452 LEAVE LOADERBANK 
0364 000416 BR E64 
10163 036454 END ;OF IF ACFLAG 
036454 L3S2:ssssce 
10164 036454 END ;OF FOR BANK 
036454 005237 002102 INC BANK 
0 023737 002102 002556 CMP BANK ,LASTBANK 
0 37 BLE B65 
036470 E6S:sisssse 
10165 036470 IF @#SWi3 OFF.IN @SWR 
036470 032777 020000 144140 BIT @#SW13,8SWR 
036476 001002 BNE L353 


—_— oo ee eee eee ee —te _— 
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VMJ MSV11-J MEMORY DIAG. 
RELOC TE PROGRAM SEQ 0276 









10166 036500 TYPE MSGO75 ;RELOCATION NOT POSSIBLE 
036500 104401 070246 wis aeons 
10167 036504 END ;OF IF #Swi3 
036 LOSS: sssass 
| 10168 036504 $RETURN ERROR 
oss 000261 SEC 
0 000207 RTS PC 
| 10169 036510 END LOADERBANK 
0365 E64:sssacs 
| 40170 036510 BEGIN FINDBANK 
036510 B66: sssa33 
10171 036510 013702 002556 MOV LASTBANK ,R2 
10172 036514 006302 ASL R2 
10173 036516 0063502 ASL R2 ;R2 <- R24 4 
10174 036520 FOR R1 := @2e2 TO R2 BY 04 
036 012701 000004 MOV @#2¢2,R1 
tte B67:; 43 
10175 036524 IF @BIT7!BITO OFF.IN CONFIGCR1) ;IF NO ERRORS & NO AM SPACE 
036 C32761 000201 002664 BIT @#BIT7!BITO,CONFIG(R1) 
0365 001035 BNE L354 
10176 036554 IF @BITiS OFF.IN CONFIG+2(R1) ;IF NOT LOADER BANK 
036534 032761 100000 002666 BIT @BIT15.CONFIG+2CR1) 
036542 001031 BNE L355 
10177 036544 IF CPUBIT SET.IN CONFIGC(R1) ;IF ACCESSABLE 
036544 033761 002106 002664 BIT CPUBIT,CONFIGCR1) 
36552 001425 BEQ@ L356 
10178 036 74 IF @#BITS OFF.IN CONFIG+2(R1) THEN LEAVE FINDBANK ;IF PARITY 
one 2 ose7es 000400 002666 oat BITS .CONFIG+2(R1) 
10179 036564 IF @BIT6 SET.IN CONFIGC(R1) AND @BIT7 OFF.IN CONFIGCR1) 
036564 032761 000100 002664 BIT #BIT6,CONFIGCR1) 
036572 001405 
036574 032761 000200 002664 BIT #BIT7,CONFIGCR1) 
0 2 001001 BNE L357 
sIF 1ST PROTECTABLE ECC BANK 
10181 036604 LEAVE FINDBANK 
0 000447 BR E66 
10182 036606 END ;OF IF #BIT6 
0 L3OS7:ssssss 
10183 036606 IF INHECC IS FALSE 
0 065737 002536 TST INHECC 
036612 001005 BNE L360 
10184 036614 SET  INHECC 
0 14 012737 177777 2002536 MOV #-1,INHECC 
10185 0 2 010137 002540 MOV R1,INHBANK 
0186 036626 END; OF IF INHECC 
036626 L360:sssese 
10187 036626 END ;OF IF CPUBIT 
036626 L356:ssseee 
10188 Oueate END ;OF IF @BIT15 
} La5S:ssesace 
10189 036626 END ;OF IF @BIT7 
036626 L354:issaae 
10190 036626 END ;OF FOR 
0 062701 000004 ADD #4,R1 
0366 020102 CMP R1,R2 


102 
10222 


036634 


3 
037026 
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RELOCATE PROGRAM 


003733 


000261 
000207 


005037 
042761 
005000 
071027 
010037 
013737 
004737 


052737 


DIAG. 


002542 
002536 


002540 
002300 


002536 
020000 
002300 


070246 


002536 
020000 
000004 
002310 
002532 
037516 
140000 


040732 


000001 
037600 
002310 


002664 
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IF FULLREL IS FALSE 


IF INHECC IS TRUE 


MOV INHBANK ,R1 
000030 CMP REALPAT , #30 
BEQ RELENT1 


BR RELENT1 
END; OF IF INHECC 


END; OF IF FULLREL 
CLR  ##INHECC 
IF @#SWi3 OFF .IN @SWR 
143734 
000030 CMP REALPAT, #30 
BEQ SKUB 
TY MSGO75 
TYPEIT ,MSGO75 
.OSABL 
END ;OF IF #Swis 


SKUB : $RETURN ERROR 


END FINOBANK 

CLEAR INHECC 

BIC #BIT13,CONFIG+2(R1) 
CLR RO 


DIV 64 ,RO 
LET NEWBANK := RO 


PGMCSR , PGMCSR+2 
USERMAP 


002666 RELENT1: 


RELOC1: 


002534 MOV 

CALL 

BIS 
SABL 


@B1IT15!BIT14,PSW 


¥V  06,100000, SIZE 
JSR RS.BLOCKS 
SIZE 


100000 

. DSABL CRF 
@BITO,MMRO 
NEWKERNEL 
—_ 


177776 


177572 JMPRL1: 


RO 
CONFIGCRO),R2 


SEQ 0279 


BLE 867 
EG7:ssssass 


TST FULLREL 
BNE L361 
TST INHECC 
BEG L362 
:IS THIS PATTERN 30? 
;YES - SKIP MESSAGE 


L362:ss5353 


L361l:sissas 
MAKE SURE FLAG IS TURNED OFF! 
BIT #SW13.aSuR 
BNE L363 
118 THIS PATTERN 30? 


;YES AGE 
;sRELOCATION NOT POSSIBLE 


L363:ssssiss 
SEC 
RTS PC 
E66: ii3333 
;IF WE RELOCATED PROPERLY, nee a BE OFF! 
; INVALIDATE BACKGROUND PATTERN 


MOV RO,NEWBANK 
;SAVE CURRENT PGM. CSR 
;MAP NEWBANK TO USER PAR 
sENTER USER MODE 
:GO TO USER MODE 


sMOVE PROGRAM 


;ENTER KERNEL MODE 
;DEENERGIZE MEMORY MANAGEMENT 


;RO <- RO @ 4 


©) eee ee 


ee ee + os 


— 
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RELOCATE AM SEQ 0280 
10223 037032 302 SWAB sé} 
10224 037034 042702 177760 BIC @tC17.R2 
037040 302 ASL R 
10226 037042 737 000001 177572 BIS @B1ITO,MMRO ;ENERGIZE MEMORY MANAGEMENT 
10227 037 010237 002532 MOV R2,PGMCSR : ;PUT NEW PGM. CSR INTO PGMCSR 
1 037 032760 010000 002666 BIT 81712. CONFIG+2(RO) :IS THE NEW BANK INTERLEAVED? 
1 037062 001412 BEQ i$ ;BRANCH IF NOT INTERLEAVED 
1 037064 01 MOV CONFIG(RO),R2 
10231 037070 042702 007777 BIC tC170000,R2 
1 037074 07 177775 ASH @-3,R 
1 037100 052702 100000 BIS @81T15,.R2 
10234 037104 050237 002532 BIS 2 
10235 037110 is: SET RLFLAG 
012737 177777 002126 MOV #-1,RLFLAG 
10236 037116 $RETURN NOERROR 
037116 000241 CLC 
037120 000207 RTS PC 





~— ewe _— 
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RELOCATE 
10239 037122 


SEQ 0281 


UNRELOCATE : SUBTST <<UNRELOCATE PROGRAM>> 
Ne re alee aaenmaa aaa aammmamaa amas 


——— = <_< _ 





: *SUBTEST 
{ PSHSSSESSSSSSSASSSESSSAASASESEEESESAEEASESESESEAESERSESSSESSESESESSEEESSSEEESEESESOES 
jl LOADERS 
10241 0371 RO 
037 1 MOV RO, -(SP) 
1 42 037 013701 002432 MOV LOADBANK ,R1 
1 037130 013700 002576 MOV LOADHOME , RO 
1 037134 004737 037350 CALL § BANKMOV 
10245 037140 004737 037702 CALL § NEWLOAD ;MAP NEW LOADER BANK IN KERNEL SPACE 
i 037144 PUSH BANK 
037144 013746 002102 MOV BANK, -(SP) 
10247 037150 013737 002432 002102 MOV LOADBANK , BANK 
1 0371 034737 037760 CALL EXBANK 
1 037162 013701 0021 MOV BANKINDEX,R1 
1 0371 042761 002666 BIC @B1T15,CONFIG+2(R1) ;CLEAR LOADER FLAG 
1 037174 013737 002576 002102 MOV LOADHOME , BANK 
1 037 004737 037760 CALL 
i 037 Ci3701 002104 HOV BANKINDEX Ri 
i 4 9 7 12 042761 002666 BIC @B1T15,CONFIG+2(R1) sINVALIDATE BACKGROUND PATTERN 
037 012637 002102 MOV (SP)+,BANK 
10256 037 24 CLEAR INHECC ;MAKE SURE ECC TESTS ARE NOT INHIBITED: 
37 005037 002536 CLR INHECC 
;RESTORE BANK 0 
1 037230 042737 020000 002666 BIC @B1T13,CONFIG+2 ;INVALIDATE BACKGROUND PATTERN 
10260 037236 LET NEWBANK := 00 
037 005037 002310 CLR NEWBANK 
10261 037242 004737 037516 CALL § USERMAP ;MAP NEWBANK TO USER PAR 
057246 USER ;ENTER USER MODE 
037 052737 140000 177776 Bis @B1IT15!81T14,PSW ;GO0 TO USER MODE 
10263 037254 BMOV 0,100000,SIZE ;MOVE PROGRAM 
087 004537 040732 RS, BLOCKS 
9 + 100000 
Os 7se2 $00000 0 
_DSABL CRF 
1 0 7266 04417 KERNEL ;ENTER KERNEL MODE 
10265 037270 737 1 177572 BIC @B1TO,MMRO ;DEENERGIZE MEMORY MANAGEMENT 
i 03727 737 037600 CALL NEWKERNEL 
1 037 013737 002532 MOV PGMCSR+2,PGMCSR ;RESTORE PREVIOUS PGM. CSR 
1 037310 737 000001 177572 BIS @BITO,MMRO ;ENERGIZE MEMORY MANAGEMENT 
10269 037316 37 002126 CLR FLAG 
10270 037322 012700 002666 18: MOV @CONFIG+2,RO ;MOVE 2ND WORD OF CONFIG TO RO 
10271 037 042710 020000 23: BIC @81T13, (RO) ;CLEAR BACKGROUND VALID BIT 
10272 037 062700 0v0004 ADD : ; INCREMENT TO NEXT BANK 
10273 037 7 003620 CMP RO. @3620 ; 
10274 037 003771 BLE 23 ;NO - BRANCH 
10275 0 7344 POP RO 
037 012600 MOV (SP)+,RO 
10276 037346 000207 RETURN 


EE - 
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UNRELOCATE PROGRAM SEQ 0282 
10280 037350 BANKMOV:SUBTST <<MOVE BANKS>> 
3 ——— ——<=— #£246466646666646648 
Ge MOVE 
| ———— as 
MOVE 3/4 
CALL 
: ;RO = DESTINATION BANK 
;R1 = SOURCE BANK 
S 037 104415 SAVREG 
% 037 004737 037516 CALL USERMAP 
; 037 104416 RESREG 
2 087 104415 SAVREG 
026 072027 000011 ASH #9. .RO : 
129 037 0721 7 000011 ASH 09. RI | 
9291 037 1370¢ 177650 MOV OUIPAR4 ,R2 | 
; 03737 01370 000200 MOV #200,R3 
ose 010122 MOV R1,(R2)+ ;MAP 1ST HALF BANK 
037 060301 ADD , ;BUMP BY 
037406 c10122 MOV R1.(R2)+ 
037410 060301 ADO R3,R1 
037412 010022 MOV RO,(R2)+ 
037414 060300 ADD R3. 
037416 010022 MOV RO, (R2)+ 
037420 060300 AD? R3,RO 
0374 USER 
037422 052737 140000 177776 BIS eBIT1S:B1T14, ,PSW ;GO TO USER MODE 
037430 BMOV 190000 140000, SIZE/2 ;MOV 1ST HALF BANK 
37430 004537 040732 JSR R5,BLOCK3 
037434 020000 SIZE/2 
037436 140000 140000 
037446 100000 100000 
DSABL CRF 
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MOVE BANKS 


10398 037442 
+8 037444 


10321 037476 
037476 


10324 037510 


10334 037512 
10 037514 


104417 
012702 
010132 


o10122 
wepevesn 


177650 


140000 


040732 
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KERNEL 

MOV @UIPAR4 ,R2 
MOV R1,CR2)+ 
ADD ° 

MOV R1,CR2)¢ 
ADD R3,R1 
MOV RO,CR2)¢ 
ADD ° 

MOV RO,CR2)+ 
ADD R3,RO 
USE 


177776 @B1T15!B1IT14,PSwW 
ro 


00000, 140000, SIZE/4 
Sy BLOCKS 





00000 
. OSABL CRF 





sENTER KERNEL MODE 


;MAP 2ND HALF BANK 
;BUMP BY 4K 


:GO TO USER MODE 
sMOV 3ND FOURTH OF BANK 


sENTER KERNEL MODE 


SEQ 0265 


CVMJABO MSV11-J MEMORY 
MOVE BANKS 


10326 037516 


10 037516 

10 037 

10 ie) 

10 ] 

10 0 

10 ° 

10 ] 

10 

IS 

ISS 382 

10 

10 ] 

10 ] 

i 

10345 0 14 

isis Siieie 

10846 037600 

10349 037600 
pe thy 64 
937608 

10 037606 

10 0 a 

10 037616 

10 

10 

10 

i a 


19360 Bit 
10361 037646 


10 

10 037646 
i ) 

10 7 

i 037664 
i 037670 
i 037674 
10369 037700 


DIAG. 


002102 


172350 


172350 
000200 
172352 
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002272 


USERMAP:SUBTST <<SUBR MAP USER TO NEW BANK>> 
ee ee Ck or  ———ccccncmmenamas 
MAP USER T ANK 


s*SUBTEST 
epee  -* _ _——— ~~“ UY Wt *y)eeeee 


MOV IPARO,R1 :COPY KERNEL PAR’S & POR'S (0 
MOV @KIPARO.R 
MOV @UIPDRO.RS 
MOV @KIPORO RA 
MOV 

18: MOV cna). (R1)+ 
MOV 2 CRS) 4 
S08 ; 
py Ro - BANK 1 STARTS AT 100,000 LESS 6 LSB’S 

ee 3 P 
;FOR MEMORY MANAGEMENT = 1000 

MOV 04,R5 

2%: MOV RO.(R1)+ s SETUP UIPAR( 4-7) 
ADD @200 RO ADORESS 
MOV CR4),CR3)+ SETUP OTPORC Ss. 7) 
S08 RS,28 
RETURN 

WKERNEL : SUBTST <<SUBR SETUP KERNEL PAR’S FOR NEW BANK>> 


eee uae ee Ye —nccncccennes 


;*SUBTEST SUBR SETUP KERNEL PAR’S FOR NEW 
ee eC el 
MOV RO. -( SP) 
MOV Ri. -CSP) 
MOV RS.-(SP) 
MOV @KIPARO,RO 
ASH #9 a. BANK 1 STARTS AT 100,000 LESS 6 LSB’S 
a] a L . 
:FOR MEMORY MANAGEMENT = 1000 
MOV 04,R5 
is: MOV R1,CRO)>+ :;SETUP KIPAR(O-3) 
ADD Ri 
S08 RS.18 
POP R5,.R1,RO 
MOV (SP)+.RS 
MOV CSP )+,R1 
MOV (SP)+.RO 
RETURN 


:SUBTST <<SUBR MAP KERNAL PARS 4 AND 5 TO A BANK>> 
Minoan guage oe ge Oe en ey nme, 
MAP KERNAL PARS 4 5S TO A BANK 


3; *SUBTEST 
| CHRSSEESSEESSESSSOEEESAEEERELEESSESSESEOESASESESSEEESESEEESEEESESESEEEEESEEDEEEDE 


MOV BANK,RS 

ASH #9. ,R5 

KIPAR4 , SAVPAR 
IPAR4 









;MOV BANK NUMBER TO RS 

:RS ENTERS 100000 LESS SHIFT TO CREATE MAPPING 
;SAVE OLD PAR 

GET NEW PAR'S 


RS KIPARS : 


SEQ 0264 
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| SUpn ”° HAP KERNAL PARS 4 AND S TO A BANK SEQ 0285 
10370 
10371 037702 NEWLOAD:SUBTST <<SUBR SETUP KERNEL PAR’S FOR NEW LOADER 
t SESHSHSSSSSSSSSSSSSSSSSSSHSSSSSSSSSSSSSSHSSSSSSESSSSSSSSSSHSSESSSEESSEEE 66666666 i 
; SUBTEST SUBR § SETUP KERNEL PAR’S FOR NEW LOADER BANK ) 
P| SSSESSHESASSSSSSSSSSSSESSSHESSSSSSSSSSSSSSSSSSSHSSSHSSSSSSSSSSSSSSSSESSSHSSHOSSEESEE 
19872 CONTAINS THE DESTINATION BANK 
3735 0377 PUSH Ri 
010046 MOV RO, -(SP 
010146 MOV R1,-C(SP 
10374 0 01 172350 MOV @KIPAR4 Ri 
000011 ASH #9. .RO :BANK 1 STARTS AT 100000 LESS 6 LS8‘S (1000) 
MOV RO. (R1)+ :SETUP KIPAR4 
000200 ADO #200 
78 010021 MOV RO.(R1)+ ;SETUP KIPARS 
POP R1.RO 
012601 MOV (SP)+,R1 
0 MOV (SP) RO 
tose? 7 RETURN 
i 037734 UNMAP: SUBTST <<SUBR UNMAP KERNAL PAR'S 4 AND 5>> 
| SSSESNHSASSSSSSSHSSSSSSSSASSSASSSSSSSHESSSHSSSESSSSSESEESESSSEEESSESSSSEESEESEEESESE 
;¢SUBTEST SUBR § _UNMAP KERNAL PAR’S 4 AND S 
F] SSHSAHSSSHSSESSSESSSHSSSESSSSHSSSSHEASSSSSSESHSSSESSESSSSESSSSSSSSOSSSSSESESSESESSESEEEE 
037734 013737 002272 172350 MOV SAVPAR , KIPAR4 ;RESTORE K1PAR4 
77 737 000200 002272 ADD #200, SAVPAR ;ADD 200 FOR NEXT PAR 
7 013737 002272 172352 HOV SAVPAR , KIPARS ;RESTORE KIPARS 
10386 037 930207 RETURN , 


- _—— 


——_——- ee TE -_- 
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CVOR” URMAP KERNAL P —_ 

















‘S$ 4 AND 5S SEQ 0286 
10389 037760 EXBANK: SUBTST <<SUBR EXAMINE BANK>> 
{ CARARESEESEERESLAESESOEEEESEESEESESSEAEEEEEEEESEEESEEEDEDEREEEEDEEEEEODSESEDEDS 
;@SUBTEST SuBR INE 
§ 2660606664666660668. 28062 666620666666666646468 $4646464466644666666646664666646664666666466664 
10390 ;D0ES THE FOLLOWING: 
10391 (1) SETS UP “BANKINDEX” AND Ri BASED ON VALUE OF “BANK”. 
1039¢ 3€2) THE "MKFLAG" IF THE BANK IS 
1039 13) “KPFLAG” IF THE BANK IS THE PROTECTED REGION OF ECC MEMORY. 
10394 :(4) “ACFLAG” IF THE BANK CAN BE ACCESSED BY THIS CPU. 
10395 :(5) SETS THE “PFLAG” IF THE BANK IS IN 
10 % 3(6) SETS THE “RRFLAG” IF RELOCATION IS REQUIRED TO TEST THIS BANK; HOWE VER 
1039 ; IT COMPLEMENTS THIS FLAG IF THE RELOCATION FLAG “RLFLAG" IS SET (THIS S38 
10 98 ; NECESSARY FOR T OF THE RECURSIV S). THE “RRFLAG” 
103 ; IS ALWAYS SET TO DISABLE TESTING IF FIELD SERVICE MODE “SELECTED BANKS” 
10400 ; ARE BEING TESTED AND THIS BANK IS NOT SELEC TED. 
1040 3(7) SETS THE “BMFLAG” IF THE BANK IS A BAD HOWEVER, IT COMPLEMENTS 
1 ; THIS FLAG IF THE “WORST” FLAG IS NOT SET eTHts 1s NECESSARY FOR THE USE 
1040 ; OF THE RECURSIVE “MODE” SUBROUTINES). 
10404 :(8) SETS THE “INTFLAG” IF THE BANK IS INTERLEAVED. 
10405 3(2) SETS THE “INT64K” FLAG IF THE BANK IS INTERLEAVED ON 64K WORD BOUNDS. 
i :€10) SETS THE “SKIPMK” FLAG IF THIS BANK IS INTERLEAVED, AND HAS ALREADY 
1040 ; BEEN TESTED. 
10408 : 
10409 037760 PUSH _RO,R1,R2 
037760 010046 MOV RO, -(SP) 
037762 010146 MOV R1.-(SP) 
037764 010246 MOV R2.-(SP) 
10410 037766 CLEAR MKFLAG,KPFLAG 
037766 005037 002120 CLR MKFLAG 
037772 005037 002114 CLR KPFLAG 
10411 037776 SET ACFLAG 
037776 012737 177777 002116 MOV @-1,ACFLAG 
CLEAR PFLAG, RRFLAG,BMFLAG 
005037 002122 CLR PFLAG 
040010 005037 002124 CLR RRFLAG 
040014 005037 002130 CLR BMFLAG 
10413 940020 CLEAR INTFLAG, INT64K,SKIPMK 
37 002136 CLR INTFLAG 
9400g6 37 002140 CLR INT64K 
0400 37 002342 CLR SKIPMK 
10414 040034 013701 002102 MOV BANK .R1 
040040 006301 ASL Ri : 
10416 040042 006 \ ASL Ri ;R1 <- RL « 4 
10417 040044 01015 002104 MOV R1, BANKINDEX 
10418 940050 032761 000100 002664 BIT eB1T6,CONFIG(R1) ;PROTECTED REGION OF ECC MEMORY? 
10419 001403 BEQ is :NO - SKIP 
10420 040060 SET KPFLAG 
040060 012737 177777 002114 MOV @-1,KPFLAG 
10421 040066 112700 0v0002 18: MOV @BIT1,RO 
10422 040072 If RO SET.IN CPUBIT AND RO OFF.IN CONFIG(R1) 
040072 030037 002106 BIT RO,CPUBIT 
040076 001405 BEQ 1364 
040100 030061 002664 BIT RO, CONFIGC(R1) 
040104 001002 BNE L364 
10423 040106 005037 002116 CLR ACFLAG 
10424 040112 END ;OF IF RO 
040112 L364:siseai 


_- -— 


———— 


012737 
032761 
001421 
012737 
032761 
001403 
012737 
032761 
001403 
012737 


DIAG. 


002116 
002666 
177770 
000003 


177777 
040354 


177777 
00020 


177777 
177777 
002126 


002124 
000001 


177777 
002600 


002130 
002002 
040000 


177777 
010000 


177777 
004000 
177777 
000040 


177777 
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002130 


2s: 


9$: 


10$: 


ENE XBK : 








TST 
BNE 


COM SAFLAG COMPLEMEN 
SOM SELON Y Is TRUE AND @BIT14 OF? “IN CONFIG OCI) 


us 
CONF IG+2(R1),R2 
og R2 

.03 


rh 
BMFLAG 


ENE XBK 

see Cee SSeSENS D 
MKF LAG 
@BIT7.CONFIGCR1) 
PFLAG,.RRFLAG 
RLFLAG 

6$ 

RRFLAG 

a anne 
BMF LAG 

ees" 


RRFLAG 

IF SELONLY 
#B1IT12,CONFIG+2(R1) 
ENE XBK 

INTFLAG 

ey saan seers? 
INT64K 
oBITS.,CONFIGC(R1) 
ENE XBK 










SKIPMK 
R2,R1,RO 


-—_—_——_— IN ~ < 


SEQ 0267 


;ACTIVE MEMORY? 
;BRANCH IF NOT 


sISOLATE MEM TYPE BITS 
13S THIS AN ILLEGAL MEM TYPE? 


ol Fond hea F 
:SET BAD BANK FLAG 


MOV @-1,6MFLAG 
s JUMP OVER REST OF FLAG TESTS 
‘IS = THERE ? 


sNO - SK 
;YES - SET MKFLAG 


;BANK = PROGRAM SPACE? 
;NO - SKIP 


MOV @-1,MKFLAG 


MOV @-1, PFLAG 
MOV @-1,RRFLAG 
:IS =" RELOCATED? 


:NO 

sYES - COMPLEMENT RELOCATION REQUIRED FLAG 
omy © perce IN THIS BANK? 

3 = 


MOV @-1,8MFLAG 
ves 8 A_ WORST FIRST PASS? 


pe 
+ BAD MEMORY FLAG 
TST SELONLY 
BEG L365 
BIT @#BIT14,CONFIG-2(R1) 
BNE L365 
MOV @-1,RRFLAG 
11S THIS BAN INTERLEAVED? 
;BRANCH IF IT I 
MOV #@-1,INTFLAG 
:IS THIS BANK INTERLEAVED WITH 64K BOARDS? 
;BRANCH IF IT IS NOT 
MOV @-1, INT64K 
; SHOULD was "ae BE TESTED? 
;BRANCH I T SHOULD 
MOV #@-1,SKIPMK 
MOV (SP)- or 


MOV Steg 
MOV (SP)+,RO 


sRESTORE REGISTERS 





CVMJABO MSV11-J MEMORY 
SUBR EXAMINE BANK 
10465 040364 
10466 
10467 
10468 
10469 040364 0135700 
10470 040370 005100 
10471 040372 013701 
10472 040376 074001 


10473 040400 000207 


10485 040416 012757 
000207 


90 005237 
10491 040432 023737 


| 

| 
10477 
10476 
10479 040402 005237 
104860 040406 022757 
10481 040414 000207 
10492 040440 000207 


DIAG. 


002134 
002120 


000027 


002102 
002556 


TL LT A — ——_—— - — 
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002112 


002112 


002102 


BANKOK: SUBTST <<SUBR BANK OK?>> 
| ORSEASEEESESEEESESEEEEESESESEESESEESSEESEEEESEEESESESEESEEESESEESSESESEESEESEEOOEES 
;*SUBTEST SUBR BANK OK 
| PPSSOSESESESSESESESSESEEESEESEEESEEESSESEEEESEESEEEHEEESSERESEESOEHESESESESOEES 
;TEST TO INSURE THAT THE TYPE OF MEMORY IN THE PRESENT BANK 
:IS OF THE TYPE WE ARE TESTING “TMFLAG”. 
;RESULT IS RETURNED IN THE CONDITION CODES (OK = (=0)). 
MOV TMFLAG ,RO 


COM RO 

MOV MKFLAG,R1 

XOR RO,R1 

RETURN 30K = (=0K) 


INCRPT: 

INCPAT: SUBTST <<SUBR INCREMENT PATTERN TESTING >> 

| COREESSEEEEEESEERERESSESEESESSSESEEOESESEEEESESEESEESESEEEESESEEEEEHEESESEESEODES 

; *SUBTEST SUBR INCREMENT PATTERN TESTING 

| POORER EAEEESEOEEEEEESEESEEEESEESESEEESESSEEESESESESSSSEESSEESESESSEEESEDEDEEEES 
; INCRE HE PATTERN € SET UP THE CONDITION CODES 

= - Z BIT SET INDICATES OVERFLOW 


CMP #30 ,PATTERN ;SET UP CONDITION CODES 
RETURN s;NOT EQUAL TO ZERO IS GOOD (NO OVERFi OW) 





SETPAT: 
HIPAT: SUBTST <<SUBR ST HIGHEST PATTERN TESTING TYPE>> 
| PRESS OEEEESESEEESEREEEESD CUSESERERESEREEEEEESESEESEESEDESEEESEESEESEOEEESEEEESESS 


;*SUBTEST SUBR SET HIGHEST PATTERN TESTING TYPE 
| PRSORAESEESOEESESESEESESEEESESEEERESEEEEDESSEESEESESEEEESEESEESSEEEESSEEEEEEEDES 
Ad 027 ,PATTERN ;SET HIGHEST PATTERN 


INCBNK: SUBTST <<SUBR INCREMENT BANK € TEST>> 


| PRASRESESEEEESEEESEESEEESES+ESEESSESESEEESEESEEESEEEEEEESEEEEEEEEEEEEESEOEEEEEEEESS 
; *SUBTEST SUBR INCREMENT BANK € TEST 


F SSSSHSSESSSSEHESSESSSEASSHESEAESSOSSESESEASESSESESSESSEKESSSESESSSESSESEESSSESESESEESE 


== RETURNED IN CONDITION CODES 
CMP LASTBANK , BANK ;TOO FAR? 
RETURN 


SEQ 0288 


-—- 


CVMJABO MSV11-J MEMORY 
SUBR INCREMENT BANK 
10495 040442 
10496 
10497 
10496 
10499 
i 
1 040442 104472 
1 040444 
040444 012737 
10504 0404 
0404 005737 
0404 001 
004737 
i C04737 
1 040470 104421 
10507 040472 005737 
i 040476 001003 
1 042737 
1 000005 
1333 040510 000000 


DIAG. 
é TEST 


040506 


002126 
037122 
022066 
002454 
000040 


———— a _—— 
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172516 


QUIT: 
3; ¢SUBTEST 


SUBTST 


<<QUIT ROUTINE>> 


§ SSESSSSSSESSESSSSESSSESESHSSESSESESESSEHEESEEEESESESESEEESEESSEESEEEEEEEEEEESESESOS 
QuI 


EE << 


QUIT1: 


SINITIALIZE ALL CSR‘S 

OCATE IF NECESSARY 

;FLUSH OUT ANY 

TURN OFF MEMORY Y MANAGEMENT 

‘TURN OFF THE Q-BUS MAP 

bCcinrt AP ON DOUBLE BIT ERRORS (NORMAL) 

SETA ;TRAPS TO 4 GOTO QUIT1 

MOV 171.4 

_DSABL 

if RLFLAG IS TRUE THEN $CALL UNRELOCATE 
TST RLFLAG 
BEQ L366 
JSR PC, UNRELOCATE 

L366:iss333% 

CALL MTOO3O FLUSH OUT DBE’S 

DEENERGIZE ‘TURN OFF MEMORY MANAGEMENT 

TST NO22BIT IS THIS AN 11/83,11/23-8 OR 11/23? 

BIC @B1TS.MMR3 TURN OFF THE @-BUS MAP 

oe 


SEQ 02869 


a 
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QUIT ROUTINE SEQ 0290 
10515 040512 EXIT: SUBTST <<HALT PROGRAM>> 
ae nana aaa menmemmanna sees 
le 
| RARASERESESESESERAEAEEEESEREEEREEEEEEEEREEAEERESEAESSESESEEEEDEESEDEOESEEEEESESS 
10516 040512 004737 040544 CALL SHUTUP 
10517 040516 EXIT2: IF APTFLAG IS TRUE OR ACTFLAG IS TRUE 
16 005737 002352 TST APTFLAG 
040522 001005 BNE L367 
Oneaes 005737 002350 TST ACTFLAG 
0405 001402 BEQ@ L370 
32 L367:isssis 
10518 32 000777 BR 
10519 34 ELSE 
040534 0004035 BR L371 
540536 L37O:ssssss 
10520 eters 000000 SEXHALT: HALT 
10521 000137 003670 JMP START 
10522 040544 END ;OF IF APTFLAG 
10523 040544 L37isssssss 
10524 040544 SHUTUP: SUBTST <<SHUTDOWN DIAGNOSTIC>> 
5 SHASHEAESESERSSAAERELESESSAESESEEEEEREREEESEEERESEEEESEEESEOSSEEESSEEEESEEEEEEEE 
; *SUBTEST SHUTDOWN DIAGNOSTIC 
| RASRAEEAERERESESERASESEEEEEAESEERERESEEEDEEEEEEDDEEEESEEEESEEEEEEEEEEEEEDEEEESE 
10525 s INITIALIZE ALL CSR'S 
10526 ; UNRELOCATE 
10527 LUSH é 
10528 ;sRESTORE LOADERS 
10529 ;TURN OFF MEMORY MANAGEMENT 
10530 ;UNMAP THE @-BUS MAP 
10534 040544 104472 CCINIT id Hee ON DOUBLE BIT ERRORS CNORMAL ) 
10535 040546 IF RLFLAG IS TR THEN $CALL UNRELOCATE 
040546 005737 002126 TST RLFLAG 
040552 001402 BEQ@ L372 
040554 737 037122 JSR PC, UNRELOCATE 
040560 L372:sssse3 
10536 IF QUICK IS FALSE 
040560 005737 002436 TST QUICK 
001 BNE L373 
10537 004737 022066 CALL MTOO3O0 ;FLUSH OUT DBE'S 
10538 040572 END ;OF IF QUICK 
040572 L373:ssssss 
10539 040572 012700 000001 MOV #1,R0 ;DESTINATION BANK 
10540 040576 013701 002576 MOV LOADHOME ,R1 ;SOURCE BANK 
1 1 737 037350 L BANKMOV 
1 104421 DEENERGIZE ; TURN OFF MEMORY MANAGEMENT 
1054 10 005737 002454 T NO22BIT ;DOES THIS PDP-11 HAVE 22-BIT ADDR? 
10544 040614 1003 i$ ;BRANCH IF NOT 
ee rt 040616 pnw $O 0v0040 172516 BIC oBITS.MMRS ;TURN OFF Q@-BUS MAP 
10550 
10551 040626 APTDOWN:SUBTST <<APT SHUTDOWN SEQUENCE>> 
| RARARASEAEAEAESEASEAEEESEEEEAESEAREEESEEREREESEAESAEESESEESEEEDESSELOREREDESEEE 
; «SUBTEST APT SHUTDOWN SEQUENCE 
| eRARSEAREERESSEESEESEESAEEERERERESEEAEAEESEEDEESEEESEDEESEOEEEEEEEEEEEESESEEESS 
10552 040626 ;MAP SUPERVISOR SPACE (TEST AREA) TO BANK 00 
040626 010346 MOV RS,- ) 


: 


040630 
040634 


040640 
10553 040642 
040642 


040650 
10555 040656 

56 040664 
10557 040672 
10558 040674 


838 


O MSV11-J MEMORY 
DOWN SEQUENCE 


012703 
004737 
012603 
053737 
012737 


012737 
012737 
104417 


002552 
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177776 
060024 
060026 
120626 


MOV 

CALL 

. OSABL 
TESTAREA 
BIS 

. DSABL 
MOV 

MOV 

MOV 


KERNEL 
APTHLT: HALT 


60 ,R3 
MAPPER 
CRF 


TESTMODE , PSW 


: MOV (SP)+,R3 
;ENTER TEST MODE 
;GO TO SYSTEM TEST MODE 


CRF 
@APTDOWN ,FIRST +24 


@340 ,.FIRST+26 
#0 ,FIRST+APTDOWN 


sENTER KERNEL MODE 


SEQ 0291 


ee Se 





ene ee ee a eee 
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APT SHUTDOWN SEQUENCE SEQ 0292 


10561 040676 SUBTST <<BLOCK MOVE SUBROUTINE>> 
3 SESSSESSESESSSESASSASASASESSSEAESAASESESSSESSESEHESEASAESEHESRSEHESEEHSESEKESESEEEEESEEESSD 
;*SUBTEST BLOCK MOVE SUBROUTI 
Fy SEEARESEASASSASASSSESASASSESAASSASSESSAESESSESSESESEAEESESESASESSESESEEEESEESEESEEEEESEEOESEEEEEED 
10369 ;BLOCK3 HAS 3 ARGUEMENTS | 
1056 ;BLOCK2 HAS 2 ARGUEMENTS 
103¢5 ;B8LOCK1 HAS 1 ARGUEMENTS 
1 5 : 
po ARE CALLED BY THE BMOV MACRO 
10568 040676 BLOCK1: PUSH RO,R1,R2 
040676 O01 MOV RO, -CSP) 
040700 010146 MOV R1,-CSP) 
010246 MOV R2,-CSP) 
+) 012702 177640 MOV @FASTCITY,R2 
10570 040710 012701 000020 MOV #16. ,R1 
1 Lf 040714 i BR 
10E78 040716 BLOCK2: PUSH RO,R1,R2 
040716 Cl MOV RO, -CSP) 
040720 010146 MOV R1,-CSP) 
040722 010246 MOV R2,.-CSP) 
10574 040724 012701 000020 MOV #16. ,R1 
10575 040750 BR 2¢ 
10577 040732 BLOCK3: PUSH RO,R1,R2 
0407 01 MOV RO, -CSP) 
040734 010146 MOV R1,-CSP) 
0407 010246 MOV R2,-CSP) 
10378 0407 12501 MOV CRS)+,R1 
10579 040742 012502 2s MOV CRS)+,R2 
iSaer 0407 012500 3$ MOV CRS)+,RO 
1058 0407 12022 is MOV CRO)+,CR2): 
10583 040750 077102 S08 R1,1$ 
10584 040752 PoP R2,R1,RO 
0407 012602 MOV (SP)+,R2 
040754 012601 MOV (SP)+,R1i 
0407 012600 MOV (SP)+,RO 
10585 040760 205 
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FIELO SERVI 
10586 
10589 
10590 040762 


-J MEMORY DIAG. 
MODE SEQ 0293 


-SBTTL FIELD SERVICE MODE 


FIELOSERVICE : SUBTST <<SUBR FIELD SERVICE COMMAND MODE>> 
| PARSER EAEEEEEREREEEEEEEEESESESERESEEESEESSEEESEEESEEESEESESESSESEEEEEEEEEEESDES 


;*SUBTEST FIELD SERVICE C 
| PRARERESEREESEEEESAEEEESEESESEEESEEAESEEESESEDESEEEEESESESESESESSESEEEESEEDEOEES 


——— we 


10591 040762 104415 AVRE : 
10592 040764 TYPE  MSGO20 ;FIELD SERVICE COMMAND MODE | 
104401 066166 TYPEIT ,MSGO20 | 
DSABL CRF : 
10594 040770 IF RLFLAG IS TRUE OR NOFSMODE IS TRUE | 
040770 005737 002126 TST RLFLAG | 
040774 001903 L374 
040776 005737 002426 TST NOFSMODE 
041 001404 BEQ L375 
041004 L374:iss533 
10595 041004 TYPE MSGO48 ;NOT AVAILABLE NOW - TRY LATER! 
041004 104401 067627 TYPEIT ,MSGO48 
.DSABL CRF 
10596 041010 104416 
10597 041012 000207 RETURN 
0596 041014 END ;OF IF RLFLAG | 
041014 L37S:ssssse 
10599 041014 005737 002544 TST CACHKN 
041020 001402 BEQ $ 
10601 041022 PUSH  CONTRL ;SAVE CACHE STATUS 
041022 013746 177746 MOV CONTRL. -(SP) 
10602 041026 1$: PUSH  CSRNO,KAMIKAZE ;SAVE CSR & KAMIKAZE STATUS 
041026 013746 002152 MOV CSRNO, -(SP) 
041032 013746 002006 MOV KAMIKAZE. -(SF ) 
10603 041036 104424 CACHOFF ;TURN CACHE OFF 
041 SET KAMIKAZE 
041040 012737 177777 002006 MOV @-1,KAMT<XAZE 
10605 041046 FS1: TYPE § ™SGO26 ; COMMAND : 
041 104401 067057 TYPELT ahisco26 
10606 041052 104414 RDDEC ;READ A DECIMAL NUMBER 
10607 041 PoP RO ;COMMAND --> RO 
041 012600 MOV (SP)+,RO 
10608 041056 020027 000022 CMP RO,#18 
041 101403 BLOS i$ 
10610 041064 TYPE #$ MSGO21 
041 104401 066207 TYPEIT ,MSGO21 
.DSABL CRF 
10611 041070 000766 BR FS1 
10612 041072 i$: CASE RO 
041072 010046 MOV RO, -(SP) 
041074 006316 ASL @sP 
041076 004737 041150 JSR PC,.L376 
10613 041102 041160 FSCMDO ;EXIT FIELD SERVICE COMMANDS 
10614 041104 041262 FSCMD1 ;READ C 
10615 041106 041372 FSCMD2 ;LOAD C 
10616 041110 1540 FSCMD3 ; EXAMINE 
10617 041112 042014 FSCMD4 ;MODIFY MEMORY 
10618 041114 042334 FSCMDS ;SELECT BANK & PATTERN 
10619 041116 043252 FSCMD6 ;TYPE CONFIGURATION MAP 


yin 


VMJABO MS 
UBR FIELO 
10620 041120 
1 041122 
1 041124 
1062 potty os 
10624 0411 
1 083334 
i 0411 
10627 041136 
i 041140 
i 041142 
10630 041144 
1903 041146 
10632 041150 
OA teS 
0411 
Ost tas 
0411 
10633 041156 


Vill-J MEMORY DIAG. 
SERVICE COMMAND 


043260 
043552 
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FSCMD7 ;S0B-A-LONG TEST 
FSCMDS : OR Y 
FSCMD9 ;REFRESH 
FCMD10 ;SET FILL COUNT 
FCMD11 sENTER KAMIKAZE MODE 
FCMD12 ;EXIT KAMIKAZE MODE 
FCMD13 ;TURN CACHE OFF 
FCMD14 ;TURN CACHE ON 
FCMD1S ;TEST ONLY SELECTED BANKS 
FCMD16 ;RESUME TESTING ALL BANKS 
FCMD17 ;ENABLE TRACE 
FCMD18 ;DISABLE TRACE 
END ;OF CASE vain 
:eaa8 
ADD (SP)-. 
MOV @(SP)+, -(SP) 
JSR PC,a(SP)- 
BR FS1 


SEQ 0294 


Oe 


-— we ee 





FSCMD1: SUBTST 


<<FS 


READ CSR>> 


1 
ace uaa ae y care crcrmcememmnmes 
1 READ CSR 


TTT Laie idbeiiiededaibaa Dabaah pbsbsboobbenusesaobecoredsenesessnensosoecconcecss 


10659 041262 004737 044576 WHICHCSR 
041 010637 002306 MOV SP, FSSTACK 
10661 041272 SET4 @RESI ; TRAPS TO 4 GOTO RES1 
04 012737 041336 000004 MOV @RES1.4 
.DSABL CRF 
10662 041300 104426 READCSR 
041302 SET NOERROR 
041302 012737 177777 002430 MOV @-1,NOERROR 
041310 104026 ERROR +26 ;USE ERROR ROUTINE FOR PRINTOUT 
10665 041312 RES4 "RESET TRAPS TO 4 TO DEFAULT 
041312 012737 034002 000004 MOV @TIMEOUT,4 
041320 022737 000005 004064 CMP #5, PROTYP ;IS THIS AN 11/83/84 ? 
041326 001002 BNE 10i$ ;BRANCH IF NOT 
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von O° Piece SERVICE COMMAND MODE ” -™ SEQ 0295 
10636 041160 FSCMDO: SUBTST <<COMMAND 0 EXIT>> 
§ SHESSESSESSSSESESHASSSAAESSAESSSEEESSESESSEEEEESESESAESESSSEESSSEEOSESEELESESESEHOOES 
;*SUBTEST 0 EXIT 
{ SESASSAAAASSASSESSEESEEREESEESESEEESEEESESSSEESESEEEESESESESESSEEESESESEESEEESEEEEES 
10637 041160 TYPE M™SGi03 ;LEAVING FIELD SERVICE MODE 
041160 104401 070605 TYPEIT ,MSG103 
.OSABL CRF 
10638 041164 062706 000002 ADD #2,SP 
0639 €41170 IF SKIPKAMI IS TRUE 
041170 005737 002010 TST SKIPWAMI 
041174 O01 BE 
10640 041176 062706 2 ADD 2,SP ;THROW AWAY OLD KAMIKAZE FLAG 
10641 041202 005037 002010 CLR SKIPKAMI 
10642 041206 ELSE 
04 000402 BR L400 
041210 ap} ; 
10643 041210 POP KAMIKAZE /RESTORE OLD KAMIKAZE 1 
041210 012637 002006 MOV (SP)+, KAMIKAZE 
10644 041214 END ;OF IF SKIPKAMI 
041214 L400: ssisss 
10645 041214 PoP CSRNO 
041214 012637 002152 MOV (SP)+.CSRNO 
10646 041220 737 002544 TST CACHKN 
10647 041224 001414 BEQ RESO 
041226 IF CACHKN EQ CACHKF ;IF CACHE IS OFF 
041226 023737 002544 002550 CMP CACHKN, CACHKF 
0412 L401 
Ae 2,SP ;THROW AWAY CACHE STATUS 
vom BR L402 
eee es 
TST CACHKN 
BEQ RESO 
POP CONTRL ;RESTORE CACHE STATUS 
MOV (SP)+, CONTR 
END ;OF IF CACHKN 
L402: sisi: 
RESO: RESREG 
RETURN 


oo <ooeeee eeee e  ee 


— 


CVMJABO MSV11-J MEMORY 
FS COMMAND 1 


041330 
041334 


10670 0413570 


005037 


000207 
104401 
013706 
eee 


001002 
005937 


000207 


DIAG. 
READ C 


177766 
1018: 


RES1: 
067033 


002306 


034002 000004 
000005 004064 


177766 
1018: 


CLR 


ee YOS.02 Monday 07-Oct-85 16:57 Page 3527-1 


CPUERR 


CRF 
MSGO25 


MSGO25 
FSSTACK , SP 


@TIMEOUT ,4 
— P 


101% 
CPUERR 


CRF 


SEQ 0296 
;CLEAR OUT THE CPU ERROR REGISTER BITS 
sTHAT A EXPECTED TRAP COULD HAVE SET 


;THIS CSR DOES NOT EXIST 


;sRESET TRAPS TO 4 TO DEFAULT 
:IS THIS AN 11/83/64 ? 

;sBRANCH IF 

;CLEAR OUT THE CPU ERROR REGISTER BITS 


;THAT A EXPECTED TRAP COULD HAVE SET 


—— 
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| FS COMMAND 1 READ C SEQ 0297 
| 40673 041372 FSCMD2: SUBTST <<FS | COMMAND 2 LOAD CSR>> 
| i a Le 666668 
‘ L 
: SEHSSSHSSSSSSSSSESSSSESSSESSSSSESSSSSEHSSSSSSSESSSESSESSSESSESSESESSESESSESEESHESEEESEDE 
| 10674 041372 004737 044576 WHICHCSR 
| 40675 041376 010637 002306 SP ,.FSSTACK 
| 40676 041402 @RES2 ;TRAPS TO 4 GOTO RES2 
041 012737 041504 000004 @RES2. 4 
10677 041410 104426 
10678 041412 MSGO27 
041412 104401 067071 afisc0e27 
10679 041416 NOERROR 
041 012737 177777 002430 MOV #-1,NOERROR 
1 041 104026 ERROR +26 ;USE ERROR ROUTINE FOR PRINTOUT 
10681 041 RES4 ;RESET TRAPS TO 4 TO DEFAULT 
041 012737 034002 000004 MOV @TIMEOUT,4 
041434 022737 000005 004064 CMP ,PROTYP :IS THIS AN 11/63/84 ? 
at ery | 101% ;BRANCH 
041444 37 177766 pres CPUERR ;CLEAR OUT THE CPU ERROR REGISTER BITS 
;THAT A EXPECTED TRAP COULD HAVE SET 
106862 0414 ;FIRST CSR WORD 
041450 104401 067017 
10683 041454 104413 ;READ AN OCTAL NUMBER 
10684 0414 ;PUT IN IN LOC “CSR” 
0414 012637 002150 MOV (SP)+.CSR 
10685 041462 104425 
i 041464 104426 
10687 041466 
041466 104401 067106 
10688 041472 
041472 012737 177777 002430 MOV @-1.NOERROR 
10689 O41 i ;USE FOR PRINTOUT - NOT AN ERROR 
106 i 7 
10691 041 RES2: :THIS CSR DOES NOT EXIST 
041 104401 067033 
10692 041510 013706 002306 FSSTACK, SP 
1069 oa 14 ;RESET TRAPS TO 4 TO DEFAULT 
041514 012737 034002 000004 @TIMEOUT ,4 
oat 022737 000005 004064 #5, PROTYP :IS THIS AN 11/83/84 ? 
oe rs 3 101% : 
041332 00308 177766 saat CPUERR ;CLEAR OUT THE CPU ERROR REGISTER BITS 
$ 
;THAT A EXPECTED TRAP COULD HAVE SET 
.OSABL CRF 
10694 041536 000207 TURN 





04 
10699 041 
10700 04 

o4 


10701 rete de 


ie & 


i 


041576 


i 


zi 


16 
10720 041 104 708 
me 


18 1978s 


~~~ 


041724 


oal tas 


053737 
104017 
100408 

000 


000410 


104401 


OtOAD csR 


060000 
000001 
157776 
041726 
041734 


102 
03 


067221 


002076 


002102 


177776 
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FSCMDS: SUBTST 


<<FS 


Yy>> 


3 EXAMINE 
§ SSHSSSSSSSSSSSSSSSSSHSESESESSSSSESSESESSSSSEHSSHESSSSSSSSSHSOSSSESESSSSESESHSESESS 
FS Y 


§ SESSESSSSSSSSSSSSSAEAEAESSSSSSESSSESSSSESSSESESSESSSSESSEESESSSSSESSSESSSSESSSEESESESS 


MOV 
TYPE 
TYPEIT 
- OSABL 
TYPE 


1%: 


nS 
1 


GERESQECRRE 325: 


Kae 
quraca: 
> 


pre 








= 
: 


ye 





238 


38: T 
T 






re 


<5 z° 3 


3% 
3a 
Sz 


& 
v 
B 
; 





2 





CRO) .AL 





Ri 
Ri. -(SP) 


es 
Mt 


na, SF), 





sINDICATE PARITY ACTION 
sEXAMINE MEMORY 


sPHYSICAL ADDRESS (0-17775776)77? 


oT OCTAL NUMBER ONTO STACK € SHIOCT 
‘S IN BANK 
:PUT LSB’‘S IN RO 





MOV (SP)+,RO 


sCHECK FOR BANK TOO HIGH 
TRUE 











;BRANCH IF 

;sCHECK F ADORES s 

: ADORESS 
;CHECK FOR SS OVER 16K 
5 IF OVER 16K 





; INCASE OF TS 
; TRAPS TO 4 TO 4% 


sMAP SUPERVISOR SPACE (TEST AREA) TO GANK 
MOV RS, -CSP) 


MOV (SP)-.RS 
sENTER TEST MODE 
:G0 TO SYSTEM TEST MODE 


1160 18 FOR TYPEOUT 


TA ASCII 
gigi EADING ZEROS 






sPARITY ABORT 


SEQ 0296 


~- os 


VMJABO MSV11-J MEMORY 
Fee COMMAND 5 
107@7 041732 000405 
10729 041734 062706 
10730 041740 
041 104401 
1973 041744 000400 
10735 041746 104417 
noms" 9at7s0 012637 
041 012637 
041760 0 7 
10735 0417 te] ‘ . 
041770 012737 
041776 022757 
042004 002 
2006 37 
042012 
10736 042012 000207 
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Se MINE HEMORY _ 


067240 


43: 


1018: 






. OSABL 
BR 





CRF 
EXCMDS 


@TIMEOUT ,4 
TYP 


oS ,PRO 
101% 


ee 


sFIX STACK 
; TIMEOUT TRAP 


sENTER KERNEL MODE 
4,PARTHERE , NOPAR , BANK 


;RESET TRAPS TO 4 TO DEFAULT 

:IS THIS AN 11/83/84 ? 

;BRANCH IF 

;CLEAR OUT THE CPU ERROR REGISTER BITS 
; THAT A EXPECTED TRAP COULD HAVE SET 


SEQ 0299 


—_ = ee 


a Conan’ power 


10739 042014 


10740 042014 


pot ot os 


10761 042170 

107 

1076 sei 72 

10764 042174 

1076 

10766 042176 
042176 


— Sw ewe 


157776 
042176 
042204 


035608 


002552 


067221 
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002076 


002102 


002556 


177776 


FSCMD4: SUBTST <<FS 


OMMAND 4 
So ee, ee leh 8-7 ~~ or—crcccmccmemameaan 
Ss 4 


;*SUBTEST 


cee: wp vr : nt pepeeseespeuememepenepemceenenes 


18: 


ANK , NOPAR , PARTHE 


RO 
BANK 
CLC 


RO 
IF BANK GT LASTBANK THEN GOTO 1$ 


ADD oF IRST ,RO 
IF @BITO SET.IN RO THEN GOTO 1% ;CHECK FOR ODD ADDRESS 


IF RO HI @LAST THEN GOTO i$ 


MOV 03% ,PARTHERE 
SET4 eas 

MOV 043.4 

-OSABL CRF 

MAP BANK 


MOV BANK ,.R3 
CALL MAPPER 
-OSABL CRF 


INVALIDATE 

TESTAREA 

BIS TESTMODE , PSW 
SABL CRF 


0 

MOV (RO), RI 
;GETTING HERE MEANS 
KERNEL 

BR S$ 

TYPE § MSGO32 
TYPEIT .MSGO3S2 
.OSABL CRF 








MODIFY MEMORY>> 


s INDICATE PARITY ACTION 
IFY MEMORY 


sPHYSICAL ADDRESS (0-17775776)7? 


;CHECK FOR BANK TOO HIGH 
CMP 


BNE 
;CHECK FOR ADDRESS OVER as 


INCASE ~ ae 


;MAP SUPERVISOR SPACE iy AREA 


sENTER TEST MODE 
:GO TO SYSTEM TEST MODE 


WE GOT LUCKY - NO TRAPS 
sENTER KERNEL MODE 


;PARITY ABORT 





AD OCTAL NUMBER ONTO STACK € SHIOCT 
;PUT MSB’ : IN BANK 


MOV (SP)+,.RO 







BGT 1 


BIT 
1 


BHI 1 


MOV (SP)+.RS 


SEQ 0300 


10767 042202 
10768 
10769 042204 
10770 042210 
042210 
10771 042214 
77 


10 ¢ 
rT seaate 


10775 0422350 
30 
10776 0422 
10777 236 
10778 pers on 


10764 
10765 042266 
10786 pany: 1 


ta 


042304 
erties 


o4g3i6 6 
aastes 


10788 042332 


10767 


CVMJABO MSV11-J/ MEMORY 
FS COMMAND 


104401 
104415 
012601 
053737 
010110 


012737 
022737 
001002 
005037 


000207 


DIAG. 
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MODIFY MEMORY 
Be EXCMD4 ;EXIT 
000004 4%: ADO ;FIX STACK 
; TIMEOUT TRAP 
067240 
;EXIT 
5$: ;0LD DATA WAS 
067365 
PRINT IT 
s SAVE Ri FOR TYPEOUT 
3:GO TrPE--OCTAL ASCII 
;;TYPE 6 DIGITS 
; ; SUPPRESS LEADING ZEROS 
; INPUT NEW DATA 
067422 
;READ ON OCTAL NUMBER ONTO THE STACK 
;GET NEW NUMBER 
MOV (SP)+,R1i 
:ENTER TEST MODE 
002552 177776 I »PSW :GO TO SYSTEM TEST MODE 
MOV ;PUT IT IN MEMORY 
MOV i AD IT AGAIN 
;ENTER KERNEL MODE 
TYPE ;DATA IS NOW 
067404 
SABL 
Ri INT 
MOV R1,-C(SP) ;:;SAVE R1 FOR TYPEOUT 
TYPOS 3:;G0 TYPE--OCT ASCII 
- 6 SETYPE 6 6 DIGITS 
‘ 0 : sSUPPRESS LEADING ZEROS 
.OSABL CRF 
EXCMD4: KERNEL ;ENTER KERNEL MODE 
POP 4, PARTHERE , NOPAR , BANK 
MOV (SP)+-.4 
002 MOV (SP)+.PARTHERE 
002076 MOV (SP )+,NOPAR 
002102 MOV (CSP)+. BANK 
RES4 ;sRESET TRAPS TO 4 TO DEFAULT 
034002 MOV @TIMEOUT ,4 
004064 CMP 05, PROTYP :IS THIS AN 11/83/84 ? 
BNE 101% ;BR 
177766 sane CLR CPUE ;CLEAR OUT THE CPU ERROR REGISTER BITS 





;THAT A EXPECTED TRAP COULD HAVE SET 


SEQ 0501 


—— —_—-- - 
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VMJABO FISV11 J) fi nordne y age 








S COMMAND MODIFY SEQ 0302 
10791 042334 FSCMDS: SUBTST <<FS 5 SELECT BANK & PATTERN>> 
§ SRSSSSSESESSESSEAESESESESEEHESSSESSSSEEEEEESSSSSESSESESSESSESESSSSSSESESEOESEEEESEE 
; «SUBTEST FS COMMAND 5 SELECT BANK & PATT 
§ SSHSSSSSESESESEEEEASESESESESESEEESESESESEESESEEEEEESESEESSESEESEEEEESEEESEEEEEESS 
10792 042334 PUSH  BANK,PATTERN, TESTADD, PCBUMP, TKVEC, TKVEC+2 
042334 013746 002102 
042340 013746 002112 
042344 013746 002412 
042350 013746 002 
042354 013746 
O42 13746 MOV 
10793 364 010637 002306 SP ,.FSSTACK ;SAVE LAST GOOD STACK POINT 
10794 042370 MSGO40 ;SELECT BANK & PATTERN TEST 
042370 104401 067444 gftsG040 
10795 042374 1s: ;BANK( 0-177)? | 
042374 104401 067142 sfsG030 | 
10796 042400 104413 ;READ AN OCTAL NUMBER ONTO THE STACK 
10797 042402 BANK ;PUT IT IN BANK 
042402 012637 002102 MOV (SP)+, BANK 
10798 042406 IF BANK GT LASTBANK THEN GOTO 1$ ;CHECK FOR BANK TOO HIGH 
042406 023737 002102 002556 CMP BANK ,LASTBANK | 
- 042414 003367 GGT 18 
10800 042416 013701 002102 MOV BANK ,R1 
10891 042422 006301 ASL Ri 
042424 006301 ASL Ri 
10803 042426 IF CPUBIT OFF.IN CONFIG(R1) 
042426 033761 002106 002664 BIT CPUBIT,CONFIG(R1) 
042434 001003 BNE L403 
10804 042436 TYPE MSGO41 :BANK NOT ACCESSABLE 
042436 104401 067470 TYPEIT ,MSGO41 
.OSABL CRF 
10805 042442 GOTO 1% 
042442 000754 BR 1% 
10806 042444 END ;OF IF 
s0807 ° L403:sissis 
1 042444 2%: TYPE M™SGO42 ; PATTERN(O-45)? 
042444 104401 067515 TYPEIT fsc042 
042450 104413 RDOCT ;READ AN OCTAL NUMBER ONTO THE STACK 
10810 042452 POP PATTERN ;PUT IT IN PATTERN 
042452 012637 002112 MOV (SP)+, PATTERN 
10811 042456 IF PATTERN GT #47 THEN GOTO 2$ ;CHECK FOR PATTERN TO HIGH 
042456 023727 002112 000047 CMP PATTERN, 047 
042464 003367 BGT 23 
10812 042466 IF PATTERN EQ #0 
042466 005737 002112 TST PATTERN 
042472 001004 BNE L404 
10813 042474 TYPE MSGO43 ;PATTERN © DATA IS? 
042474 104401 067533 TYPEIT ftsco4s 
10814 042500 104413 RDOCT ;READ AN OCTAL NUMBER ONTO THE STACK 
10815 042502 POP R2 ;PUT IT IN R2 
042502 012602 MOV (SP)+,R2 


L 


MSV1 
Cc 





-J  iaald 


104401 
013737 


012737 


DIAG. 
SELECT BANK E 


002102 
035604 


037760 
002124 


067667 
043154 


067555 
002152 
002102 
000002 
002664 
177770 
177760 


002152 
043154 


000340 
140014 
000200 
000100 


177777 


MACRO 


002154 


000060 
000062 


177776 
137776 


002612 
002110 


002412 
002414 


002666 
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P 335-1 
seal SEQ 0303 


END ;OF IF 
L4O04:sc553 
MAP BANK ;MAP SUPERVISOR SPACE (TEST AREA) TO BANK 
MOV R3,-C¢ ) 
BANK ,R3 
CALL MAPPER 
.DSABL CRF 
MOV (SP)+,R3 
INVALIDATE 
CALL EXBANK ;SET NEW MARGINS 
IF RRFLAG IS TRUE 
ur —_ 
TYPE M™SGO049 ;BANK REQUIRES RELOCATION 
TYPEIT MSGO49 
.DSABL CRF 
JMP CMDSC 
END ;OF IF RRFLAG 
L405:sissss 
TYPE MSGO046 :TO ESCAPE TYPE ANY KEY! 
TYPEIT ,MSGO46 
.D0S CRF 
MOV CSRNO,.SAVCSR ree OLD CSR NUMBER 
MOV BANK ,R2 
ASH #2 ,R2 1 GENERATE INDEX INTO CONFIGURATION TABLE 
MOV CONFIGCR2), R3 RS = L WORD OF CONFIGURATION TABLE FOR THIS BANK 
ASH #-10,R3 POSITION CSR CODE IN BITS 0-3 
BIC etci7, R3 ;CLEAR ALL BUT THE CSR CODE 
ASL as ADJUST CSR NUMBER 
MOV 3,CSRNO 3 
MOV SchoSC. TKVEC 
MOV 340 TRVEC: 2 
MOV asT TKB.R KILL ANY OLD INTERRUPT 
BIC @BIT7 Pou LOWER CPU PRIORITY TO 140 
BIS @BIT6.@$TKS ‘ENABLE KEYBOARD INTERRUPTS 
SET HEADER ,MUT 
MOV @-1, HEADER 
MOV @-1,MUT 
MOV BANK ,R1 
ASL Ri 
ASL 
CLR 
CLR PASFLG 
MOV FIRST. TESTADD 
MOV OFIRST+2, TESTADD+2 
IF @#B1Ti2 SET.IN CONFIG+2C(R1) 
BIT @BIT12,.CONFIG+2¢(R1) 
BEQ L406 
INC SPLTCSR 
MAP BANK 
MOV R3,-CSP) 
MOV BANK ,R3 
CALL MAPPER 





EEE EE 
- A TT TT 


CVMJABO 
FS 


~ 
& 
= 


98 4 
10899 043126 


0126035 
012737 
032777 
001402 
104470 
000405 
013746 
104502 
012637 


C12737 
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COMMAND 5 
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MACRO Y 
SELECT BANK & PATTERN 


120000 


000001 


002414 


137656 


002076 
002326 


-DSABL CRF 


MOV #120000, TESTADD+2 
END; OF IF @BITi2 


IF @SWO SET.IN @SWR 


MOV (SP)+,R3 


L406: sisaas 
BIT @SWO,.8SWR 
BEQ L407 
;DISABLE ERROR CORRECTION 


ECCOIS 
ELSE 
L410 
L4O7:sisses 
PUSH CSRNO 
MOV CSRNO, -(SP) 
CLRCSR ;CLEAR CSRS 
POP CSRNO 
MOV (SP)+,CSRNO 
END ;OF IF 
L410:ssssai 
MOV @2,NOPAR ;sPARITY ACTION 
MOV #2 ,PCBUMP ; TRAPS ADD 2 TO PC 
MOV PATTERN,RO 
ASL RO 
CALL aF SPATCRO) 
CLR NOPAR 
BR CMD58 ;LOOP TILL KEYBOARD INTERRUPT 
FSPAT: MTOOOO ;<1 SEC DATA PATTERN TEST 
TOOO1 ;<1 SEC ADDRESS TEST 
mMTOO02 :<1 SEC COMPLEMENT cane TEST 
MTOOOS ; 1 SEC 3 T CASE NOISE TEST 
MTOOO4 ; 1 SEC ROTATING ZEROS TEST 
MTOOOS ; 1 SEC TATING TES 
MTOOO6 ;<1 SEC INITIAL DATA TEST 
MTOOO7 ;<1 SEC SS BIT TEST 
MTOO10 ;<1 SEC TE ADDRESSING TEST 
MTO999 ;<1 SEC NULL TEST TO KEEP TABLE ORDER 
MTO999 ;<1 SEC TEST TO KEEP TABLE ORDER 
MTO999 ;<1 SEC NULL TEST TO KEEP TABLE ORDER 
MTO0014 ; 1 SEC BASI E BIT ERROR TEST 
MT 3<1 SEC NULL TEST TO KEEP TABLE ORDER 
MT 3<1 SEC NULL. TEST TO KEEP TABLE ORDER 
MTOO17 ;<1 SEC HOLDING 1'S € 0'S ST 
0020 ; 1 SEC SYNDROMES CSR ON SBE TEST 
MTOO21 ; 1 SEC MARCHING 0’S € 1'S TEST 
0022 ;10 SEC REFRESH €& SHIFTING DIAGONAL TEST 
MTOO23S ;10 SEC SHIFTING OI EST 
MTO0024 ;20 SEC FAST GALLOPING PATTERN TEST 
MTO999 ;<1 SEC NULL TEST TO KEEP TABLE ORDER 
:<1 SEC RANDOM DATA TEST 
MTOO27 ; 1 SEC UNIQUE BANK TEST 
MTOOSO ; 1 SEC FLUSH OUT DBE‘'S TEST 
MTOO31 ; 3 SEC SOB-A-LONG TEST 
MTOO3S2 ;<1 SEC WRITE RECOVERY TEST 
MTOOS3S ;35 SEC BRANCH GOBBLE TEST 
MTOO34 ; 1 SEC SOFT ERROR TEST 
MTOOSS ;<1 SEC WORST CASE NOISE PARITY TEST 


SEQ 0504 


a LLL LAL LLL 


CVMJABO MSV11-J MEMORY 
FS COMMAND 5 


012637 
012637 


010346 
013703 
004737 
012603 
004737 
013737 
000207 


004737 
000207 


DIAG 


, MACRO YOS.02 
SELECT BANK & PATTERN 


002306 
000100 


000062 
000060 
137442 


0023526 
002412 


002112 
002102 


002102 
035604 


037760 
002154 


032610 


137454 


002152 


em ee 
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: ip SEQ 0305 


TOO36 =; 1 SEC CORRECTION CODE. TEST 
MTOO37 ;<1 SEC ECC DISABLE TEST 
MTO999 ;<1 SEC L TEST TO KEEP TABLE ORDER 
MT0041 ; 1 SEC ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 
MT0042 ;<1 SEC EXTENDED Q-BUS ADDRESS TEST 
MT0043 ; 1 SEC WRITE BYTE CLEARS SBE TEST 
MT0044 ; 5 SEC SHIFTING 1/0'S THROUGH THE CHECK BITS 
MT0O45 ; 1 SEC SYNDROMES TO CSR ON DBE T 
MT0046 ; 1 SEC CHECK SINGLE BIT ERROR WITH Ecc DISABLED TEST 
MT0047 ;<1 SEC NO CSR UPDATE WITH SBE ON DBE TEST 
CMDSC: MOV FSSTACK, SP ;RECOVER OLD STACK POINTER 
BIC @BIT6, a$TKS 
POP TKVEC+2, TKVEC 
MOV (SP)+, TKVEC+2 
MOV (SP)+, TKVEC 
MOVB TKB,RO ;GET CHARACTER TO GET RID OF FLAG 
POP CRUMP. TESTADD 
MOV (SP)+,PCBUMP 
MOV (SP)+, TESTADD 
POP PATTERN, BANK 
MOV (SP)+, PATTERN 
MOV (SP)+, BANK 
MAP BANK ;REMAP OLD BANK 
MOV Rs o> ¢ SP ) 
MOV BANK ,R3 
CALL #$ MAPPER 
“OSABL CRF 
MOV (SP)+,.R3 
CALL § EXBANK 
MOV SAVCSR,CSRNO ;RESTORE CSRNO. 
RETURN 
FSCMD6: SUBTST <<FS TYPE CONFIGURATION MAP>> 
3 — ss | LL !!|6| 6h ee 
; #SUBTEST F 6 TYPE CONFIGURATION MAP 


j PRASERERERESEAEESESASESEEESESSEAEEEEEESEREDSD OEEEEEEEDEEEDEEEEOEEEEE44E044840888 
CALL ONFIG 
RETURN 





MSV11-J MEMORY 
COMMAND 6 


043260 


032777 
001402 

04470 
000401 
104502 


104401 


104401 
012737 


012737 
012737 


DIAG. 


067762 
067555 


000340 
137262 
000200 
000100 


177777 
177777 


002102 
037760 
0v2116 
002124 


022342 


137314 


000060 
000062 


177776 
137244 


002612 
002110 


I MACRO YOS.02 Eg eneay 07-Oct-85 16:57 Page 3358 
TYPE CONFIGURATION MAP 


FSCMD7: SUBTST 7 
pObonasecsassanssonssaossasossssasoesconssoossensenconsesossesoneessecseooeeseees 
3; #SUBTEST FS COMMAND 7 

ce we eres 
PUSH BANK , PATTERN, TKVEC, TKVEC +2, NOPAR 


CMD76 : 


MOV 
TYPE 


TYPEIT 
. DSABL 
IF @SWO 


ECcCcDIS 
ELSE 

CLRCSR 
END ;0OF 


TYPE 
TYPEIT 
DSABL 


PE 
TYPEIT 
. DSABL 


FOR BANK 


<<FS 


SP ,FSSTACK 
MSGOS5 


CRF 
SET.IN @SWR 


IF 
neat, 
CRF 


MSGO46 
MSGO046 


@CMD7C , TKVEC 
6340, TKVEC:2 
TKB,R 


as 0 
oBIT7.PSW 
OBIT6. a$TKS 


HEADER , MUT 


:* #0 TO LASTBANK 


SOB-A-LONG TEST>> 
SOB-A-LONG T 


MOV BANK, -(SP 
MOV PATTERN esp) 
MOV TKVEC, -(SP) 
MOV TKVECs2, -(SP) 
MOV ,-(SP) 

;SAVE LAST GOOD STACK POINTER 

;SOB-A-LONG TEST 


;DISABLE ERROR CORRECTION 


BR L412 
L41lisssssss 
;CLEAR CSRS 


12:33 


(BELL * EACH PASS COMPLETE: 


;TO ESCAPE TYPE ANY KEY! 


;KILL ANY OLO INTERRUPT 
;LOWER CPU PRIORITY TO 140 
; ENABLE KEYBOARD INTERRUPTS 


MOV @-1,HEADER 
MOV #@-1,MUT 


CLR BANK 
B7O:ssssas 


CALL EXBANK 
IF ACFLAG IS TRUE AND RRFLAG IS FALSE 


INVALIDATE 


CALL 


0031 


MT 
END ;OF IF ACFLAG 


END ;0F 


FOR BANK 


TST ACFLAG 


L4i3:ssssse 


—- --———- | ————— 
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FS COMMAND 7 


SOB-A-LONG TEST SEQ 0307 
043444 005237 002102 INC BANK 
043450 023737 002102 002556 CMP BANK ,LASTBANK 
043456 003757 BLE 870 
043460 E7O:sssssss 
10957 043460 TYPE sBELL ;RING BELL 
043460 104401 002655 TYPEIT ,$BELL 
.OSABL CRF 
10958 043464 GOTO CMD78 
° 043464 000752 BR CMD7B 
10960 pot rt 013706 002306 CMO7C: MOV FSSTACK,SP sRECOVER OLD STACK POINTER 
10961 043472 042777 000100 137142 BIC @BIT6,asTKS 
1 043 117700 137140 MOVB 3 . ;sREAD CHAR TO KILL FLAG 
10963 0435 POP NOPAR , TKVEC +2, TKVEC ,PATTERN, BANK 
04 012637 002076 MOV (SP)+,NOPAR 
043510 012637 000062 MOV (SP)+, TKVEC+2 
043514 012637 000060 MOV (SP)+, TKVE 
043 012637 002112 MOV (SP)+,PATTERN 
0435 012637 002102 MOV (SP)+, BANK 
10964 0435 MAP BANK ;MAP SUPERVISOR SPACE (TEST AREA) TO BANK 
043530 010346 MOV R3.-CSP) 
043532 013703 002102 MOV BANK ,R3 
043536 004737 035604 on MAPPER 
043542 012605 MOV (SP)+,R3 
10965 043544 004737 037760 CALL EXBANK 
10966 043550 000207 RETURN 


— ———— eee eas —-—— - <= - 


—— er 
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CVMJABO MSV11-J MEMORY DIAG. 
FS COMMAND 7 SOB -A-LONG TEST SEQ 0308 
10969 043552 FSCMDS: SUBTST <<FS COMMAND 8 ERROR SUMMARY>> 
| POREEEEREEEEEEEESSEEEESEEERERESESSESERERERESEEEESESESEESEESEEEESEESEEEESSEEESESS 
;*SUBTEST FS c ERROR S Y 
| REREEESEEESEEEEESEEEEESEREEESEEEESERERESEEEESEEEEREEESSESESEEESESEESEODEDEOEODS 
10970 043552 PUSH RO,R2,.R3,BANK 
043552 010046 MOV RO, -CSP) 
pattie or eese MOV R2,-CSP) 
043 010 MOV RS, -CSP) 
043560 013746 002102 MOV BANK, -(SP) 
1097 pot ts 2 013737 056724 002434 MOV $PASS, TEMP 
10972 043572 005337 002454 DEC TEMP 
1097 prt dh TYPDEC TEMP 
043576 033786 002434 MOV TEMP , -C SP) ::;SAVE TEMP FOR TYPEOUT 
04 1 ys cos 3:GO TYPE--DECIMAL ASCII WITH SIGN 
10974 04 013737 172350 002270 MOV KIPAR4 , SAV4 seal. * Cc. Rey 8 
10975 043612 012737 001000 172350 MOV #1000, ,KIPAR sa33si.b vB 
0976 pot nt TYPE MSG12 ; PASSES COMPLETED 
104401 071312 TYPEIT .MSGi125 
.DSABL CRF 
10977 es TYPDEC sERTTL 
013746 002650 MOV SERTTL, -C SP) ;:;SAVE SERTTL FOR TYPEOUT 
104405 ee cre ;3;GO TYPE--DECIMAL ASCII WITH SIGN 
10978 esses TYPE MSGO79 ;ERROR(S) DETECTED 
0436 104401 070335 TYPEIT ,MSGO79 
.OSABL CRF 
10979 043636 IF sERTTL NE #0 
043636 903737 002630 TST sERTTL 
2 445 BEG L414 
37 002334 CLR SUCCESS 
109861 0436 FOR BANK := @0 TO LASTBANK 
36 005037 002102 _ CLR BANK 
2353833 
1 04 013703 002102 MOV BANK,R3 
12083 O4 070327 000004 MUL @4,R 
1 043664 IFB CONFIG+2C(R3) NE 00 
04 105763 002666 TSTB CONFIG+2(R3) 
043670 001424 BEQ@ L415 
10965 04367 IF SUCCESS IS FALSE 
043672 005737 002334 TST SUCCESS 
043676 001005 BNE L416 
10986 043700 TYPE MSGO76 ;BANK ERRORS 
043700 104401 070300 TYPEIT ,MSGO76 
-OSABL CRF 
10987 043704 SET SUCCESS 
043704 012737 177777 002334 MOV #-1.SUCCESS 
10988 part te END ;OF IF SUCCESS 
043712 L416:issies 
10989 043712 TYPOCS BANK ,3 
043712 013746 002102 MOV BANK, -( SP) 1 BANK FOR TYPEOUT 
$3 
043716 104403 TYPOS 33G0 TYPE--OCTAL ASCII 
37 006 BYTE 6 :31TYPE 6 DIGIT 
043721 000 Sais = ;;SUPPRESS LEADING ZEROS 
10990 043722 116300 002666 vB CONF IG+2(R3),RO 


a 
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FS COMMAND 6 ERROR SUMMARY SEQ 0309 

10991 0437 042700 177400 BIC @tC377,R0 

10992 0437 TYPDEC g 
0437 010046 MOV RO, -CSP) :;SAVE RO FOR TYPEOUT 
043734 104405 yon 3:;GO TYPE--DECIMAL ASCII WITH SIGN 

10993 043736 TYPE sCRLF 
043736 104401 002660 pis? sCRLF 

10994 04374 END ;OF IFB CONFIGCR3) 
04374 L4iS:ssssss 

10995 pot Loe END ;OF FOR BANK 
04374 o0ses7 002102 INC BANK 
043746 023737 002102 002556 CMP BANK ,LASTBANK 
0437 003737 BLE 8671 
043 E7issssssas 

10996 043 END ;OF IF SERTTL 
043 L414:ssssss 

10997 043756 013737 002270 172350 MOV SAV4 ,KIPAR4 331.L.C.3;;REV B 

10996 043764 POP BANK ,.R3,R2,RO 
pot Dk os C12637 002102 MOV (SP)+. BANK 
043770 012603 MOV (SP)+,R3 
043772 012602 MOV (SP)+,.R2 
043774 012600 MOV (SP)+,RO 

10999 043776 000207 RETURN 


CVMJABO MSV11-J MEMORY 
FS COMMAND 6 
11002 044000 
11003 044000 
044900 015746 
044004 015746 
044010 0135746 
044014 013746 
0137 
11004 01063 
11005 0440 
0440 104401 
42.098 
100 
rigce Saseed SEL 
il 044046 
044046 000401 
11010 104502 
11011 
11012 
104401 
Het 
SHEE sesso 
11015 oeeees 012737 
11036 © 0127357 
110 76 017700 
11018 044102 042757 
it 044110 052777 
11021 044116 
port 6 0127357 
08 012737 
11038 044132 
perte 005037 
11035 044136 0047357 
11 osai 
O44 005737 
0441 pod as 
044 737 
044 001003 
11 1 104 43 
il 1 004737 
il 164 
044164 
11029 044164 
044164 005237 


OIAG. 
ERROR 


000100 


177777 
177777 


002102 
037760 
002116 
002124 


020714 


002102 


136574 


177776 
136524 


002612 
002110 
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oe Monday age 


FSCMD9: SUBTST <<FS 


COMMAND 9 
| SESSHHSSHSESESSSESSSSESSSSSSSHSSSESSSSSSSHSSSSSSESSSSSSSSSSESHESSESSSESSSSEESESESEESES 
Ss COMMAND 9 REF 


s*SUBTEST 


MOV 
TYPE 
TYPEIT 
. OSABL 





SP ,FSSTACK 
MSGO73 


-_ 


IF @SWO SET.IN @SWR 


ECCOIS 
ELSE 


CLRCSR 
END ;OF IF 


TYPE 
TYPEIT 
. OSABL 





FOR BANK := @0 TO LASTBANK 





@CMD9C , TKVEC 
0340, TKVEC :2 
@¢TKB RO 





sTKS, 
@BIT7.PSu 
#BIT6,.SsTKS 


HEADER , MUT 


SEQ 0310 
REFRESH TEST>> 


F ST 
| SORSESSSSESEESEESESESESEESEEEESESEEEESESESESESESSSEESEESESSSSEAESESESEEEESEOEOESSE 
PUSH BANK ,PATTERN, TKVEC, TKVEC +2, NOPAR 





MOV 
MOV 
MOV | 
MOV | 
MOV NOPAP 

;SAVE LAST GOOD STACK POINTER 

;REFRESH TEST 
BIT @SWO,aSUR 
BEQ L417 


s;DISABLE ERROR CORRECTION 
L420 


L417 7 
SCLEAR CSRS S58555 


\BELL = EACH PASS COMPLETE: 


;TO ESCAPE TYPE ANY KEY! 


sKILL ANY OLD INTERRUPT 
sL CPU PRIORITY TO 140 
: KEYBOARD INTERRUPTS 





MOV #-1,HEADER 
MOV @-1,MUT 


CLR BANK 
B72:issssse 


CALL EXBANK 
IF ACFLAG IS TRUE AND RRFLAG IS FALSE 


INVALIDATE 
CALL MTOO22 
END ;OF IF ACFLAG 
END ;OF FOR BANK 


TST ACFLAG 
BEG L421 
TST RRFLAG 
BNE L421 


L421issisiss 
INC BANK 


1 
t 





Vil-J MEMORY DIAG. 
REFRESH 


044170 023737 002102 
044176 003757 





1030 

104401 002655 
1001 SEE eoorse 
1 


eh ad aah ed 
Sages 
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002556 
TYPEIT 
OSABL 
GOTO 
: MOV FSSTACK, SP 
BIC @BIT6, BSTKS 





Os TKB RO 
POP NOPAR , TKVEC +2, TKVEC ,PATT 


BANK 
MOV BANK ,R3 
CALL MAPPER 
“DSABL CRF 

EXBANK 





CMP BANK, LASTBANK 
BLE 672 


E72:sssssas 


sRING BELL 


sRECOVER OLD STACK POINTER 


READ CHAR TO KILL FLAG 
. BANK 





SEQ 03511 


CVMJABO MSV11-J MEMORY 
FS Cc 9 


11043 044272 


11044 ostere 
11045 044274 
274 


rr Pere pl 


11054 044320 
044320 
11055 044324 
0443<4 
0443 
11038 044340 
11056 044342 


11059 044342 
342 


010046 
104401 
104415 
0 

042700 
110037 
012600 
000207 


104401 


012737 
012737 
000207 


104401 
005037 
012737 
000207 


OIAG. 


070361 


177760 
002357 


070526 


177777 
177777 


070556 
002006 
177777 


woe ae eee ee 


MACRO YOS.02 Monday 07-Oct-85 16.57 Page 544 
REFRESH TEST 


002006 
002010 


002010 


FCMD10O: SUBTST <<FS SET FILL COUNT>> 
| POROSAEEESEEESEEEDEEESEEEESEEEEEESEEEADERESEREEESESSEESESEEHESESEEEEESEEEDOOOSES 
F COMMAND 10 


;*#SUBTEST SET FILL COUNT 
a 
MOV RO, -(€SP) 
TYPE MSGO8S ;FILL COUNTCOCTAL )? 
TYPEIT ,.MSGO8S 
.OSABL CRF 
RDOCT 
POP RO 
MOV (SP)+,RO 
BIC @tC17,RO 
MOVB RO, $FILLS 
POP RO 
MOV (SP) ~RO 
RETURN 


FCMD1i: SUBTST <<FS COMMAND ENTER KAMIKAZE MODE >> 
ieee - eam oe gee yo enemas 


;*SUBTEST ENTER KAMIKAZE 
j PPAESSREEEEEESEEEREEESESEAEEEERESEEEESEEEEESSEEEEEEEEESSSESESEESESEEESS SEOEEEEEEES 
Y 


101 sENTERING KAMIKAZE MODE 
ys 2 MSG101 
SET KAMIKAZE , SKIPKAMI 
MOV @-1,KAMIKAZE 
MOV #@-1,SKIPKAMI 
RETURN 


FCMD12: SUBTST <<FS COMMAND 12 EXIT KAMIKAZE MODE >> 
oo Naeger ~ eacimie - > peer —  cnnrccrarnenas 


; *SUBTEST EXIT KAMIKAZE MODE 
| POREEESREEESESEESEEESEEEDSEEREEEEEEEREEEEEEEEESEDEEEEEEEEOEEEEEE800000668688086 
Y ;LEAVING KAMIKAZE MODE 
pis? Sy MSG102 
CLR KAMIKAZE 
SET IPK 
MOV @-1,SKIPKAMI 
RETURN 


SEQ 0312 


———— oo = ————— 
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FS COMMAND 14 - 





TURN CACHE ON SEQ 0313 
11064 044362 FCMD13: SUBTST <<FS | COMMAND 13 TURN CACHE OFF>> 
$ 606666686666666066660606066066660060600606060600660006066606000060666066806% ¢$6620464664666 
; *SUBTEST FS COMMAND T ACHE OFF 
3 SSSSHSASSHSSSSSSSHSSSSHSSSSSSESHSESSESESESSESESSSESSESSSSSESESESSESSESESSEHESESESESESEHESESESEESEE eee 
11065 044362 YPE MSG106 ;CACHE IS OFF 
044362 104401 070704 TYPEIT 2ft$6106 
11066 044366 1 CACHOF F ;TURN CACHE OF 
11067 044370 403787 002544 002546 MOV CACHKN, CACHKN+2 ;SAVE OLO CACHE ON STATE 
11068 044376 005037 002544 CLR CACHKN ;KEEP CACHE OF 
11069 044402 000207 RE TURN 
11071 044404 FCMD14: SUBTST <<FS | COMMAND 14 TURN CACHE ON>> 
3 $O60066666666666646666666066666606466666664668666666666666466666 6$6266666666666666666 
; sSUBTEST F COMMAND 14 TURN CACHE ON 
z SHESSSASSEASSSSSSSESHESSESESESEESESSESASEASEASESSEESEEESEESEEESEESEEESEEEEEEEEESEESESEEEEEEE 
11072 044404 TYPE § SG107 ;CACME IS ON (EXCEPT DURING ACTUAL PATTERNS) 
044404 104401 070722 TYPELT MSG107 
11073 044410 013737 002546 002544 MOV CACHKN+2, CACHKN ;RESTORE OLD oghcne ON STATE 
11074 044416 104423 CACHON ;TURN CACHE ON 
75 044420 000207 RETURN 


— + eee oe 


MSV11-J MEMORY 
COMMAND 14 


104401 
004737 


012737 
000207 


DIAG 


TURN CACHE 


070631 
044516 


067142 


000177 


070777 


177777 002002 


meee -— 
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FCMD1S: 
;*SUBTEST 


SUBTST 


TYPE 
TYPEIT 
. DSABL 


<<FS 


nsG105 
CRF 


CMD16A 


CALL 
BEGIN CMD16LO00P 


REPEAT 


TYPE 
TYPEIT 
. OSABL 


MSGO30 


CRF 


RDOCT 
POP R1 


MSGO30 


iS 


IF R1 GT #177 OR R1 LT 00 


LEAVE CMD16L00P 


END ;OF IF R1 


ASL 


ot 


ASL Ri 
BIS SET IS GO EG <aCMs D 
END ;OF REPEAT 


END CMD16LO00P 


TYPE 
TYPEIT 
SABL 


.O 
SET 
RETURN 


MSGi1 


0 
MSG110 
SELONLY 


TEST ONLY SELECTED BANKS>> 
> cree wee 7 7 tr Ty} eee 

F COMMAND 15 TEST ONLY SELECTED BANKS 
j OPSSSSESSSSRSESEDSSSSSESSESESEEESEDEOSOSESOSSOESESSESESOSESEOOCCS SO SOCOSeCSCOSS 


;ENTER BANKS IN OCTAL - USE NUMBER OUTSIDE RANGE TO TERMINAT 


;ERASE OLD SELECTIONS 


;BANK(O-177)? 


B73:ssssee 
B74:issass 


;READ AN OCTAL NUMBER ONTO THE STACK 


;PUT IT IN R1 


;sR1 <- R1 « 4 


E73S:ssssazs 
;ONLY SELECTED BANKS WILL SE TESTED 


MOV (SP)-« RI 


CMP R1.0177 
BGT L422 
TST Ri 

BGE L425 


L422: sissts 


BR E735 


L423:sssic3 


BR 
E74:ssssee 


MOV #@-1,SELONLY 


874 


SEQ 0514 


tie, At Ac A LL LG LL LE LL LL LLL LLL LLL I LLL LLL nt _ 
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FS COMMAND 16 RESUME TESTING ALL suas” _ SEQ 0315 
11110 044506 FCMD16: SUBTST <<FS COMMAND 16 RESUME TESTING ALL BANKS>> 
j ORROOEREREEAEEEESEESEEEEESESEESSEEEDESEESEEEESEESESEODEE DESSESESEEEEDEEEDEESOSS 
; *SUBTEST FS COMMAND 16 RESUME TESTING ALL BANKS 
| PROGRES EESERESESESESSEESEESEESEESEEEEEEDERESEESESEESEEDEEDESSEESERESESSEDEEESES 
11111 044506 TY MSG111 ;ALL BANKS WILL BE TESTED 
044 104401 071043 is 2 »MSG111 
EEE 044512 005037 002002 CLR SELONLY 
11114 sENTRY POINT FROM CMD15 
11115 044516 013702 002556 CMD16A: MOV LASTBANK ,R2 
11116 044 006302 ASL 
11117 044 006302 ASL Fe 
11118 044 FOR R1 := #0 TO R2 BY 04 
044 005001 CLR R1 
O44 B7S:ssssas 
11119 044530 042761 040000 002666 BIC @681T14,CONFIG+2(R1) 
11120 044536 END ;OF FOR R1 
044536 062701 000004 ADD #4,R1 
044542 020102 CMP R1,R2 
044544 003771 BLE 875 
044546 E7MS:sssesees 


11121 044546 000207 RETURN 


CVMJABO MSV11-J MEMORY 
FS COMMAND 16 


11124 044550 


11125 044550 
044550 


26 044554 
044562 
111350 044564 


11131 044564 

044564 
11132 044570 
111353 044574 


104401 
012737 
000207 


104401 


005037 
000207 


DIAG. 
RESUME 


071401 


177777 006304 


071420 
006304 


MACRO YOS.02 
TESTING ALL BANKS 


mr eae 


Monday 07-Oct-85 16:57 Page 5347 


FCMD17: SUBTST <<FS COMMAND 17 ENABLE TRACE>> 


3 SESSEASSSEESEAEAERESAEESESESSASESSSASESESESSESSSESESESSEEEEASESESESESESESESESSSEHEES 


; *SUBTEST FS COMMAND 17 ENABLE TRAC 
| PRASEAEEEESEREEEEEEEEDEEESAEAEEEEEEEEEEEREEESEEEEEERESEESEEEEEEEESEEEHEEEREOOSS 
TYPE MSG127 
TYPEIT ,MSG12 
. OSABL F 
MOV @-1, TRACE 
RETURN 


FCMD18: SUBTST <<FS COMMAND 18 DISABLE TRACE>> 
| PARSEASASEEEEEEAEAEEESEEEEEEEESERERESEEESEAEREREEESEESESEESASEESESEEESESEDESSEEEDS 
; *SUBTEST FS COMMAND 18 DISABLE TRACE 
| PRAAEREREEEEASEAEEREEEAEEEEAEEEREAEEESESEEESEEESEAEESEEESEESESEESEEEDEEESEEEEE 
TYPE MSG128 
TYPEIT ,MSG128 


—_— ne LL ALL LLL LL LL LLL LLL LLL LLL LLL LLL LLL LLL CLL A I LLL —_—— --- -- 
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FS COMMAND 16 


DISABLE TRACE SEQ 0317 
11136 044576 WHICHCSR:SUBTST <<SUBR DETERMINE CORRECT CSR>> 
3 SHESAEAASESRSSESASEEESSEEESEEESASSESSESESESASAEESSESESEEESESEASESEESSESSEESAEHHESCHSEHSESSESESEEEED 
;*SUBTEST SUBR DETERMINE CORRECT CSR 
3 SHSSSESSEASAHESESSESSEASAEAESSEEESESESSSESEAEESSESEEAEAESEEEESESESAESSESESSSEEEHESEESEEEHSD 
11137 044576 013700 002224 MOV TOTCSRS,RO ;GET CSR‘S FLAG 
11138 044602 022700 100000 CMP @BIT15,R0 ;CSR 0? 
11139 044606 001005 BNE 1$ sNO - SKIP 
11140 044610 005037 002152 CLR CSRNO ;YES - SET IT UP 
totah 044614 000207 RETURN 
ilies 044616 1$: TYPE MSGO22 sWHICH CSRCO-F ) 
044616 104401 066775 yin SY -_— 
11144 044622 104412 ROLIN ;GET CHARACTER 
11145 044624 POP RO ;PUT IN RO 
044624 MOV (SP)+,RO 
11146 044626 011000 MOV CRO),RO ;PUT CHAR IN RO 
11147 044630 020027 000106 CMP RO, #106 ;CHECK LIMIT 
11146 044634 101370 BHI 1$ ;IF BAD LOOP TILL HE TYPES IT RIGHT 
11149 044636 C22700 000101 CMP @'A,RO 
11150 044642 105002 BHIS $ 
11151 044644 162700 000007 SUB #7,RO 
11152 044650 162700 000060 2s: SUB #60 ,RO 
11153 044654 006300 ASL R 
11154 044656 010037 002152 MOV RO, CSRNO 
11155 044662 000207 RETURN 


ES SS TT —— neds - 


a ne 
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DIAG. 
ERROR DATA (SUPERVISOR) Ose TUP STUFF SEQ 0318 


11621 .SBTTL ERROR DATA CSUPERVISOR) SETUP STUFF 
11622 044664 $PER25: LET ADDRESS := Ri - 02 
044664 010137 002034 MOV Ri, ss 
044670 162737 000002 002034 SUB ¢2, ss 
11623 044676 IF ABORTFLAG IS FALSE 
044676 005737 002144 TST ABORTFLAG 
044702 001007 BNE L424 
11624 044704 TESTAREA ;sENTER TEST MODE 
044704 053737 002552 177776 af TESTMODE ,PSW ;GO TO SYSTEM TEST MODE 
11625 044712 LET BAD := -2CR1) 
0447 016137 177776 002052 MOV -2(R1),BAD 
11626 044720 104417 KERNEL sENTER KERNEL MODE 
11627 0447 END ;OF IF ABORTFLAG 
0447 L424:ssi883 
11628 044722 IF 177654 EG #0 
044722 005737 177654 TST 177654 
044726 001003 BNE L425 
11629 044730 LET GOOD := Re 
044730 C10237 002044 MOV R2,GO0D 
11630 044734 ELSE 
044734 000402 BR L426 
044736 L425:sssses 
11631 044736 LET GOOD := R3 
0447 010337 002044 MOV R3,GO00D 
11632 044742 END ;OF IF 
044742 L426: isis 
131633 044742 000137 050120 JMP PERRAW 
11635 044746 PERRAS: SUBTST <<DATA WAS 3 WORDS>> 
s CREASE ERERERERSEEEAESSEEEREDSESEEEEEEEEEEREEEEEEEEEEDEEEEEEEEEEEEE664000008040488 
;*SUBTEST DATA WAS 3 WORDS 
jRERRERRERESEASEESEAEEEEEEEEEESEEESRESEEDEDEEERESEEEE EEE EEEEEEEEEDEEEEEEEODEEEDEE 
11636 044746 IF BADPC EQ #0 THEN $CALL BADSTACK 
044746 005737 002022 TST BADPC 
044752 001002 BNE L427 
044754 004737 034040 JSR PC,.BADSTACK 
044760 L427:sssca3 
11637 044760 PUSH RO 
044760 010046 MOV RO, -CSP) 
11638 044762 005037 002150 CLR CSR ;MAKE SURE CSR BIT HOLDER IS CLEAR 
13235 porte» 104505 and 2 DISABLE ECC € WRITE CHECKBITS FROM 1 SELECTED CSR 
044770 053737 002552 177776 oS + cttge ;G0 TO SYSTEM TEST MODE 
11641 044776 005711 TST CR1) ;READ LOCATION TO READ CHECKBITS INTO CSR 
err 045000 104417 KERNEL 
11643 045002 1044 READCSR ;GET CSR CONTENTS 
11644 045004 013700 0v2150 MOV CSR ,RO :;SAVE CSR CONTENTS IN RO 
11645 045010 10450 CLRICSR sRETURN CSR TO NORMAL MODE 
11646 045012 072027 177775 ASH #-5.R ;MOVE CHECK BITS TO BOTTOM OF WORD 
11647 045016 042700 177600 BIC #tC177,.R0 ;CLEAR OFF EXTRANEOUS GARBAGE 
11648 045022 LET ADDRESS := Ri ; SAVE VIRTUAL ADDRESS FOR PRINTOUT 
045022 010137 002034 MOV R1,ADDRESS 
11649 045026 005037 002044 CLR sFIRST TEST WORD WRITTEN SHOULD aEMAYS "BE ZERO 
11650 045032 TESTAREA ;sENTER TEST MODE 
045032 053737 002552 177776 BIS TESTMODE , PSW ;G0 TO SYSTEM TEST MODE 


ee at te. St CC CC LL LL LL LLL LL LLL LLL LLL LLL LALO 
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DATA WAS 3 WORDS SEQ 0319 
.DSABL CRF 
11651 045040 011137 902052 MOV (R1),.BAD ;GET BAD DATA FROM MUT - FIRST WORD 
116 045044 011437 002054 MOV C(R4),BAD2 ; AND OND WORD 
+1685 045050 104417 KERNEL ;ENTER KERNEL MODE 
116 045052 110037 002056 mMOVB RO,BADS ;sMOVE BAD CHECKBITS FOR PRINTOUT 
11655 045056 105037 002057 CLRB BAD3+1 ;CLEAR OFF THE OTHER UNUSED BITS 
11656 patron 004737 050354 CALL PERBNK ;MARK BANK AS BAD IN CONFIG TABLE 
11657 04 104033 ERROR +33 
11658 045070 POP RO ;sRESTORE RO 
012600 MOV (SP)+,RO 
11659 045072 IF @SWO SET.IN @SWR 
04507 032777 000001 135536 BIT #SWO.8SWR 
001402 BE@ L430 
11660 045102 104506 ENASBE ; TRAP ON SINGLE BIT ERRORS 
11661 045104 ELSE 
045104 000401 BR L431 
045106 L430:ssssss 
11668 045106 104472 ECCINIT ; TRAP ON UNCORRECTABLE ERRORS 
11663 045110 END; OF IF #@Swo 
045110 L431:ssssis 


i 
11664 045110 000002 RTI 


ee - - 


eee en me ee —™S “ -— 
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CVMJABO MSV11-J MEMORY 
WORDS SEQ 0320 


DATA WAS 3 


11667 045112 $PER3O: LET GOOD := Ri 
045112 010137 002044 MOV R1,GO0D 
11668 045116 LET ADDRESS := (SP) - 16 
045116 011637 002034 MOV (SP), ADDRESS 
045122 163737 000016 002034 SUB 16, ADDRESS 
11669 0451 IF ABORTFLAG IS FALSE 
045130 005737 002144 TST ABORTFLAG 
045134 001007 BNE L432 
11670 045136 TESTAREA sENTER TEST MODE 
045136 053737 002552 177776 BIS TESTMODE ,PSW ;GO TO SYSTEM TEST MODE 
11671 045144 LET BAD := BADDRESS 
017737 134664 002052 MOV SADDRESS BAD 
11672 045152 104417 KERNEL ;ENTER KERNEL MODE 
11673 0451 END ;OF IF ABORTFLAG 
L432:sii383% 
11674 045154 000137 050120 UMP PERRAW 
11676 045160 GETDATA:SUBTST <<GET DATA FROM ABORTED AREA IF POSSIBLE>> 
3 SHAERAEAAAAASASESAASSSESASSSARESESESESSSEHEASEEESESESESSEESESESESESESESESESESEESESESE 
3 *SUBTEST GET DATA FROM ABORTED AREA IF POSSIBLE 
3 SHEREEREEESSESAESKEESEKEEEEEEEEE4EO664466660646864666666666666666668666686664646666 4648 
11677 045160 PUSH 4,11 RNS 
oasiee 013746 000004 MoV 4,-(SP) 
3166 013746 000114 MOV 114, -(SP) 
116786 045172 010637 045256 MOV SP ,GETDAL 
11679 045176 012737 045236 000004 MOV 218.4 
11680 045204 012737 045236 000114 MOV #1$.114 
1168 oa52i2 013700 002034 MOV ADDRESS ,RO 
tiees 045216 TESTAREA 
045216 053737 002552 177776 a TESTMODE ,PSW ;GO TO SYSTEM TEST MODE 
11683 94 011087 002052 HOV (RO), BAD 
11685 045232 195087 002144 — ABORTFLAG 
11686 045236 013706 045256 1s: MOV GETDA1, SP ;RESTORE KNOWN GOOD STACK POINTER 
11687 045242 POP 114,4,RO 
04 012637 000114 MOV (SP)+,114 
045246 012637 000004 MOV (SP)+.4 
04 012600 MOV (SP)+.RO 
11688 04 34 000207 RET 
11689 045256 000000 GETDAL: 0 


-— 





CVMJABO evi 
POWER FAIL 
11692 
11693 
11694 
11695 
11696 045260 
11704 
LS suse 
ii fo? oa 
11706 045272 
11709 045274 
11710 04 
11711 045310 
045310 
045312 
045314 
oS 316 
045322 
117 — 
ti7is 045330 
11714 ott tr 
11715 04 
eases 
43736 045342 
HE onssa 
Litis 043 
11720 0455 
Hs Sibi 
045362 
11723 045364 
11724 04 
04 
045372 
045374 
045400 
11725 
43738 045400 
11727 045404 
117286 045410 
11729 045414 
11730 04 
11731 045422 
11732 045424 


J 
0 


014046 
077102 
005737 
001015 
012700 
012701 


014046 
077102 


002152 
177700 
000021 


002456 
172300 
000020 
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000024 
000026 


3P 


$PWRON: 


1$: 


2s: 


PD1: 


3%: 


.SBTTL POWER FAIL AUTO RESTART 
-SBTTL ROUTINE POWER DOWN AND UP 


saove CACHE STATUS 
ST CACHKN 
BEQ 6 
PUSH CONTRL 

; TURN CACHE ON 
MOV @sILLUP ,PWRVEC 1 SET FOR FAST UP 


MOV @340,PWRVEC+2 3;PRIO:7 
RO,R1,R2,R3,R4,R5,CSRNO 


;SAVE USER PAR'S E PDR7 
MOV RO 


6177700, 

MOV 017..R1 

PUSH  _-(RO) 

SOB 

1SAVE SUPERVISOR PAR’S 
NOSUPER 

BNE PD1 

MOV @172300,RO 

MOV 016. Ri 

PUSH = -(RO) 


SOB Ri,2$ 
IF RLFLAG IS TRUE THEN $CALL WOOPS 


;COPY — gh USER & SUPERVISOR 


MOV IPORO, 
MOV @UIPORO.R1 
MOV @SIPDRO,R2 
MOV 32. ,R3 
MOV CRO)+, CR2)¢ 
SOB 38 


| PORE REEESEERESESEEEEESESESESESEEESESEEESESEEEESESEEEESESEDEEDEEESEDEREOSEOEEDS 
DOWN ROUTINE 


MOV CONTPL ,-(SP) 


MOV -C(RO), -(SP) 


MOV -CRO).-CSP) 


TST RLFLAG 
BEQ L435 
JSR 


L433:ssssa3 ; 


SEQ 0321 


—— nine - 


11766 045570 


010046 


013746 
012700 
012701 


oieens 
077102 


OIAG. 
UP 


140000 


002150 


000002 
002152 


177572 
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177776 


177776 


78%: 


83: 
4$: 


Fy oo USER &€ SUPERVISOR STACK POINTERS 


BIS #81IT15!:81T14,PSW ;GO TO USER MODE 
. OSABL 
MOV USP ,RO 
KERNEL ;ENTER KERNEL MODE 
USH RO 
MOV RO, -CSP) 
is NOSUPER 
SUPERVISOR ;sENTER SUPERVISOR MODE 
Is @81IT14,PSW :;GO TO SUPERVISOR MODE 
DSABL CRF 
MOV SSP ,RO 
KERNEL sENTER KERNEL MODE 
PUSH RO 
MOV RO, -CSP) 
;SAVE ECC REGISTERS 
Vv TOTCSRS,R1 ;GET CSR’'S 
BEGIN LCSRSAVE 
B76:iis353 
FOR CSRNO := #0 TO #36 BY #¢2 
CLR CSRNO 
B77:ssssas 
ASL Ri 
ON. ERROR 
BCC L434 
READCSR 
PUSH CSR 
MOV CSR, -(SP) 
END ;OF ON.ERROR 
L434:ssssaz 
IF Ri EQ #0 THEN LEAVE LCSRSAVE 
TST Ri 
BEG E76 
END ;OF FOR CSRNO pay 
CHP CSaNO @8 
617 BLE 877 
23333888 
END LCSRSAVE — 
2388883 
SAVE MMRO,1.2.3 
PUSH MMRO_MMRA, MMR 
MOV MPIRIL. -CSP) 
MOV MmAR2 . -( SP) 
TST NOSUPER 
BNE BS 
PUSH MMRS 
MOV MARS. -C( SP) 
;SAVE KERNEL PAR‘'S 
MOV #172400 ,RO 
MOV #16. ,.R1i 
PUSH -C(RO) 
MOV -C(RO),-CSP) 
sob R1,4$ 





SEQ 0322 


CVMJABO MSV11-J MEMORY 
POWER DOWN AND UP 


ROUTINE 


022737 
001004 


013746 
015746 
017746 
010637 
012737 
000776 
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a Q@-BUS MAP REGISTERS 
ce #5 ,PROTYP 


;IS THIS AN 11/863 ? 
9% BRANCH IF NOT 
PUSH MAPHO , MAPLO 


eee vo SOFTWARE SWITCH REGISTER 





MOV SAVRE +:SAVE SP 

;NOW SET UP REAL VECT 

MOV | @$PWRUP.PWRVEC ;;SET UP VECTOR 
BR $DOWN + ;HANG UP 


HOV HAPLO: -¢8P9 


MOV awe , -(SP) 


SEQ 0325 
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| ES TES Cas ne SEQ 0324 
1176 ’ SHEHSSSESSSHSSSSSSSSSSSSSSSSSEECSSESSSHSSSSSSSSSSSSSSSSESSSSSSESHSESSSESSESSESSSHESE e666 
re al 
HBS exact _ 
11787 012737 046206 000024 MOV @sILLUP ,PWRVEC ;;SET FOR FAST DOWN 
117 ;RESTORE STACK POINTER 
117 9 013706 046212 MOV ¢SAVR6 , SP ::GET SP 
i 046212 é ;:WAIT LOOP FOR THE TTY 
1 04 37 046212 is: sSAVRE ;:WAIT FOR THE INC 
i 04 001375 is WORD 
i STORE POSSIBLE SOFTWARE SWITCH REGISTER 
11794 04 aSUR 
012677 134752 MOV (SP)+, @SUR 
1 172340 108: MOV @172340,RO 
0 72300 MOV ay : 
74 012701 b5S0c0 MOV #16. RA 
6%: POP CRO) 
MOV (SP)+,(RO)> 
0 077406 nov #77406 ,(R2)+ 
RESTORE MARS,2,1.0 
002456 st NOSUPER 
HRS 
172516 MOV ¢ 
118: PoP MARZ, MMR. MRO 
177576 MOV ¢ 
177574 MOV ¢ 
177572 MOV ¢ 
; RESTORE 7ESS REGISTERS 
002224 224 sie TOTCSRS Ri :GET CSR‘S 
LOSARES TORE. 
BilOO:sissas 
FOR CSRNO := #36 DOWNTO 00 BY e2 
000036 002152 tlen MOV @36.CSRNO 
seeeeed 
ASR OL 
ON. ERROR _ 
002150 we - MOV (SP)+.CSR 
*. 
LOADCSR 
EMD ;0F ON. ERROR 
L4SS:ssess 





IF Ri EG @O THEN LEAVE LCSRRESTORE 


END ;OF FOR CSRNO 

Q02182 000000 
ElLOL:ssssass 
ELO0O:sascss 


END LCSRRESTORE 





. ——_—-———  — + — 


————— me 
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INE 
11619 ;COPY KERNEL MAP TO USER € SUPERVISOR 
steee 046010 012700 172300 MOV «KT . 
11621 046014 012701 177600 MOV eur . 
+1838 046020 012702 172200 MOV @SIPORO ,R2 
1162 rere Ps 012703 000040 MOV #32. .R3 
118624 0460 011021 3%: MOV (RO),CR1)+ 
11625 046032 0 MOV C(RO)+,CR2)+ 
11826 046034 07730 SOB R3,3% 


7 ee ce = 22+ ee we — 


—_— —s— _ gm TE 


POWER 


046036 
046042 


ao 
ed 
gu 
Let 
: 
z 


a 
REE3 FS 


et tee 
Reed nal aad nl cal cael oak aed 


CVMJABO MSV11-/ MEMORY 
ROUTINE DOWN AND 


005737 
001006 


912600 
052737 


010006 
104417 


012600 
052737 


010006 
104417 


012700 
€12701 
te) 

077102 
012700 
012701 
012620 
077102 
013777 
013737 


012600 
012737 
104401 
005737 
001402 
012637 
000002 


000000 
000776 
000000 


DIAG. 
UP 


002456 


140000 


172240 
000020 


177636 
000021 
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177776 


177776 


134506 
000174 


000024 


13%: 


78%: 





;RESTORE SUPERVISOR € USER STACK POINTERS 
tT NOSUPER 









i> 
138 
POP RO 
MOV (SP)+,RO 
SUPERVISOR “ENTER SUPERVISOR MODE 
BIS eB1T14.PSw :GO TO SUPERVISOR MODE 
.OSABL CRF 
MOV RO, SSP 
KERNEL ;ENTER KERNEL MODE 
POP RO 
MOV (SP)+-,RO 
eB1T15!81T14,PSu ;GO TO USER MODE 
RO, USP 
;ENTER KERNEL MODE 
;RESTORE SUPERVISOR PAR’S 
MOV 0172240, 
MOV #16. ,R 
PoP (RO); 
MOV (SP)+,(RO)>+ 
S08 R1,78 
;REST USER PAR’S & POR? 
HOV #177636 ,RO 
MOV @17.,R1 
POP CRO)> 
MOV (SP)+,(RO)> 
soB 
; RESTORE "bossrace SOF TARE DISPLAY REGISTER 
MOV PATMAR , BDISPLAY 
MOV SPATMAR DISPREG 
POP CSRNO.RS.R4.R3,R2.R1.RO 


quit 





MOV @SPURDN.PWRVYEC ;;SET UP THE POWER DOWN VECTOR 

TYPE ™SGO51 sREPORT THE POWER FAILURE 

TYPELT 1 

. OSABL 

gegevens CACHE STATUS 

ST CACHKN 

BEQ 9¢ 

POP CONTRI 

arr MOV (SP)-,CONTRL 

HALT oie POWER UP SEQUENCE —= STARTED 

BR SILLUP ; BE THE POWER DOWN WAS COMPLETE 
: a : PUT THE SP HERE 


SEQ 0526 


——- - 


ee eee |e ee ew 


em we ewe 
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ROUTINE POWER DOWN AND UP SEQ 0327 
11875 046214 WOOPS: SUBTST <<POWER FAIL WHILE RELOCATED>> 
WTTTTTT TOT TTI TIT TTT 
;*SUBTEST POWER FAIL WHILE RELOCATED 
j PRORASSESESESSSESESESESEEESESESSSESSESESESESESESEEEESESSEESESEESESESSOESEEOEEES 
118676 046214 PUSH BANK 
046214 013746 002102 MOV BANK, -(SP) 
11677 046220 005037 002102 CLR BANK 
11878 046224 MAP ;MAP SUPERVISOR SPACE (TEST AREA) TO SANK 
046224 010346 MOV RS, -CSP) 
oeeaes 013703 002102 
0462 004737 035604 
046236 012605 MOV (SP)+,RS 
11867% 046240 SOR s;ENTER SUPERVISOR MODE 
046240 052737 040000 177776 eagtas. .PSW ;GO TO SUPERVISOR MODE 
11680 oneess 013737 060024 046612 FIRST +PWRVEC , WOOPSAV 
11661 013737 060026 046614 VEC +2,WOOPSAV+2 
118682 046262 , WOOPSAV +4 , WOOPEND - WOOPUP/2+12. 
046262 C04537 0407352 
oeeese 000105 
70 046616 
046272 126400 cre 
11665 74 012737 060024 MOV FIRST ¢PWRVEC 
11684 046 012737 000340 060026 MOV VEC+2 
118665 046510 BMOV T+WOOPUP , WOOPEND - WOOPUP /2 
046310 004537 040752 
046314 000071 
046316 126400 
046320 046400 
11886 046322 012700 1723540 MOV @KIPARO ,RO 
11687 046 012701 126562 MOV OF IRST +WOOPEND .R1 
11688 0463 012702 000010 MOV 
eet +4 046336 0 1 i$: MOV 
11 046 0 SOB 
11891 046342 005737 002456 TST 
11692 046 ore BNE 
116935 046350 015721 172516 MOV 
11694 046354 015721 177576 2$: MOV 
11895 046360 013721 177574 MOV 
11896 046 013721 177572 MOV 
11897 04637 0441 KERNEL ;ENTER KERNEL MODE 
11698 046372 POP BANK 
046372 012637 002102 MOV (SP)+, BANK 
11899 046376 207 RETURN 
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POWER FAIL WHILE RELOCATED SEQ 0528 
11902 046400 WOOPUP: SUBTST <<POWER UP FROM BANK 0 TO RELOCATION>> 
§ SSSSESSESEESSSESSESESESSSESEHSSSESESESSSEEESSOESHSSSHSSSSSESSESHESEHSESESEEESEEEEEEEEEEESD 
; @SUBTEST POWER UP FROM BANK © TO RELOCATION 
fs SSSSSSSSASSSSESSSSSESHSSESSSHESSESSSESSESE SHEESH SESSHESEEHSSHSHEEHSSSEEHOEEESESEESES 
11903 012700 MOV @WOOPEND , RO 
11904 046404 012701 172340 MOV @KIPARO,R1 
11905 046410 012703 172300 MOV @KIPORO.R3 
11906 046414 012702 MOV 08., 
11907 046420 i 18: MOV (RO)+,CR1)> 
11908 0464 01272 077406 MOV 077406, (R3)+ 
11909 204 SOB R2,1$ 
11910 046430 005737 002456 TST NOSUPER 
11911 046434 001002 BNE rT) 
11912 046436 012037 172516 MOV (RO)+,MMRS 
11913 046442 012037 177576 3$: MOV (RO)+, MMR2 
11914 012037 177574 MOV CRO)+_.MMR1 
11915 046452 012037 1775 MOV (RO)+, MMRO 
11916 046456 013706 MOV $SAVR6, SP 
11917 046462 PUSH BANK 
046462 ©€13746 1 MOV BANK, -(SP) 
11918 046466 37 002102 CLR BANK 
11919 046472 MAP BANK ;MAP SUPERVISOR SPACE (TEST AREA) TO BANK 
046472 010346 MOV R3, -(SP) 
046474 013703 002102 MOV BANK ,R3 
046500 03 CALL $ MAPPE 
“DSABL CRF 
046504 012603 MOV (SP)+.R3 
11920 046 SUPERVISOR sENTER SUPERVISOR MODE 
046 052737 040000 177776 Bis eB1T14 ,PSU :GO TO SUPERVISOR MODE 
11921 046514 013737 046612 060024 HOV WOOPSAV , FIRST +PWRVEC 
11922 046522 013737 046614 060026 MOV WOOPSAV+2, FIRST +PWRVEC+2 
1192 ;SIMULATE THE FOLLOWING BLOCK MOV BUT WITH NO STACK ACCESSES 
11924 ;BMOV. WOOPSAV+4,°IRST+WOOPUP , WOOPEND-WOOPUP/2+12. 
11925 046530 012700 046616 MOV @WOOPSAV+4,R0 
11926 046534 012701 000105 MOV ND-WOOPUP/2+12..R1 
11927 046540 012702 126400 MOV OF IRST +WOOPUP , R2 
11928 046 012022 2%: MOV CRO)+,(R2)+ 
119 046 077102 SOB R1,2$ 
11931 046550 104417 KERNEL ;ENTER KERNEL MODE 
1193? 256552 POP BANK 
046 012637 002102 MOV (SP)+, BANK 
11933 046556 000137 045634 JMP $PWRUP 
11934 046562 000014 WOOPEND: .REPT 102. 
11937 046612 000107 WOOPSAV: .REPT WOOPEND-WOOPUP/2-+12. +2 


ree eae -- 


———— 


ee ee ——— ee 
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IO SUBROUTI SEQ 0329 
11942 .SBTTL I0 SUBROUTINES 
tigas -SBTTL ROUTINE TYPE 
11366 | CROAEHEEEEEAEESEEERERESEESESEEEEERERESES SEER EDESESEESEEESESESEESEDEEEEEEEDODDES 
11947 ;*ROUTINE TO TYPE ASCIZ we et MESSAGE MUST TERMINATE WITH A O BYT 


11948 ;@THE ROUTINE WILL INSERT A NUMBER OF NULL ED. 
11949 | NOTE CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER 
11950  sNOTE2: $FILLS CONTAINS THE ER OF FILLER CHARACTERS REQUIRED. 
11951 S@NOTES SFILLC CONTAINS THE CHARACTER TO FILL AFTER 
3% 
11358 FeCALL 
11954 #1) USING A TRAP INSTRUCTION 
11955 — TYPE  MESADR ,;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
11956 ;#0R 
11957 3 TYPE 
ii oe Ss 
11380 és 
11961 047030 105737 002360 $TYPE: TSTB $TPFLG 1S THERE A TERMINAL? 
11962 047034 100407 BMI 6s ‘BR IF NO 
11963 047036 010046 it: MOV -(SP) SAVE R 
11964 047040 017600 000002 MOV Bot SP >, RO ‘IGET ADDRESS OF ASCIZ STRING 
11965 047044 112046 4s MOVB  (RO)+,-(SP) ; PUSH CHARACTER TO BE TYPED ONTO STACK 
11966 047046 001005 BNE 73 ‘tBR IF IT ISN'T THE TERMINATOR 
11967 047050 005726 TST (SP)+ ;HIF TERMINATOR POP IT OFF THE STACK 
11968 047052 012600 S$ MOV (SP)+,RO : RESTORE 
11969 047054 062716 000002 6$ ADD 2, (SP ; ADJUST RETURN PC 
11970 047060 RTI ; ;RETURN 
11971 047062 122716 000011 73 @HT, (SP) ‘BRANCH IF NOT <HT> 
11972 047066 001 BNE 118 
11978 047070 112716 000040 MOVB . .¢ ;REPLACE TAB WITH SPACE 
11974 047074 122716 000200 118 @CRLF . (SP)  ;BRANCH IF NOT <CRLF> 
11975 047100 001 BNE ‘ 
11976 047102 005726 TST (SP)+ ::POP_ <CR><LF> EQUIV 
11977 047104 TYPE TYPE ACR AND L 
047104 104401 TYPEIT 

‘DS CRF 
11978 047106 00 CRLF 
11979 047110 105037 047342 CLRB  - $CHARCNT »;CLEAR CHARACTER COUNT 
11980 047114 000753 BR 4s VIGET NEXT CHARACTER 
11981 04711 73 7156 8: CALL « $TYPEC +7GO TYPE THIS CHARACTER 
11982 047122 123726 002652 93: CMPR 40 s«S'ILLC.C(SP)+  ::21S IT TIME FOR FILLER CHARS.? 
11983 0471 134 BNE 4 ‘AIF NO GO GET NEXT CHAR. 
11984 047130 013746 002356 MOV $NULL, -(SP) ViGET @ OF FILLER CHARS. NEEDED 
11985 ‘AND THE NULL CHAR. 
11986 047134 105366 000001 10$:  OECB 1(SP) ;iDOES A NULL NEED TO BE TYPED? 
11987 047140 002770 BLT 98 ‘iBR IF NO--GO POP THE NULL OFF OF STACK 
11988 04714 737 047156 CALL  $TYPEC iGO TYPE A NULL 
11989 047146 105337 047342 DECB  SCHARCNT :iDO NOT COUNT AS A COUNT 
11990 0471 77 BR 10$ : LOOP 
11991 047154 XOCHAR: .WORD © 
11992 047156 $TYPEC: PUSH RI 

047156 010146 MOV R1.-(SP) 

11993 047160 116601 000004 MOVE «- 4( SP). R1 
11994 047164 005737 002544 TST CACHKN 
11995 047170 001402 BEQ 3$ 


[ 


Sone TY MSV11-J MEMORY 


04 
12058 047362 
12059 047364 


013746 


C23727 
001002 


000401 
000760 


110177 


DIAG. 


177746 


133370 


133364 
177600 


047154 


133336 
000015 


047342 
000012 


002544 


177746 


— ee ee ee 


cme eee ee CO 
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PUSH CONTRL 
23: PUSH RO 
CACHOF F 
3%: TSTB a@$sTPS 
BPL 3% 
CLR XOCHAR 
TSTB hag 
&@$TKB , XOCHAR 


MOVB 
BIC @tC177,XOCHAR 
CMP XOCHAR , 2023 


BNE NC 
CONTS3: TSTB asTKS 
BPL CONTS3 
vB 8$TKB , XOCHAR 
BIC #tC177,XOCHAR 
IF XOCHAR EQ @21 
BR NC 
ELSE 
BR CONTS3 
END ;OF IF XOCHAR 
NC: MOVE R1,8$TPB 
CMPB @CR,2C(SP) 
BNE § 
CLRB $CHARCNT 
3R $TYPEX 
i$: CMPB @LF ,2(SP) 
BEQ $TYPEX 
INCB (PC )+ 
$CHARCNT: .WORD 
$TYPEX: POP 
TST CACHKN 
BEG 2$ 
POP CONTRL 
2s: POP Ri 


MOV CONTRL ,-(SP) 


MOV RO, -(SP) 
;TURN CACHE OFF 
;:;WAIT UNTIL PRINTER IS READY 
;;CHECK FOR XOFF 
33SKIP IF NO CHARACTER 
+:SAVE THE CHARACTER 
:sSTRIP OFF ASCII 
;;WAS I CONTROL S? 
; ;BRANCH IF NOT 
;;WAIT FOR CHARACTER 
;:;GET CHARACTER 
ta OFF t 
:3; IF IT IS A tQ@ 
CMP XOCHAR, #21 
BNE L436 
BR L437 
L436:isssai 


L437:sssssi 
;;LOAD CHAR TO BE TYPED INTO: DATA REG. 
331S CHARACTER A CARRIAGE RETURN? 

; ;BRANCH 

5) eet CHARACTER COUNT 


;sEXIT 
+318 CHARACTER A LINE FEED? 
;;BR IF YES 

;;COUNT THE CHARACTER 

; }CHARACTER COUNT STORAGE 


MOV (SP)+,RO 
:I1S THERE A CACHE? 
BR H IF NOT 
;POP CACHE STATUS | 
MOV (SP)+,CONTRL 


MOV (SP)+,R1 
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.SBTTL ERROR DATA SETUP 


USE THIS 


PERRO1 


PERRO2 


PERROS 


PERRO4 


PERROS 


PERROG6 


PERRO? 


PERR10 


PERR11 


PERR12 


PERR13 


IF THIS CONDITION DISCRIBES THE ERROR 


TRAP 
BAD DATA_IN RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY -(R4) 
GOOD DATA IN RS 


BAD. DATA_IN Ri UNLESS ABORTED 
HEN BAD DATA IS POINTED TO BY -CR4) 
GOOD DATA IN R2 


TRAP 
BAD DATA IS POINTED TO BY -CR1) 
GOOD DATA IN R4 


TRAP 
BAD DATA_IN R4& UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY -2CRO) 
GOOD DATA IN R2 


JSR PC 

BAD DATA IS POINTED TO BY -CRO) 

GOOD DATA 

RETURN AFTER SETTING UP GOOD.BAD,ADDRESS 


JSR PC 

BAD DATA IS POINTED TO BY -CRO) 

GOOD DATA I 

RETURN AFTER SETTING UP GOOD.BAD,ADORESS 


TRAP 
BAD DATA_IN R2 UNLESS ABORTED 

N BAD DATA IS POINTED TO BY CR1) 
GOOD DATA IN DATBUF 


TRAP 
BAD DATA _IN R2 UNLESS ABORTEC 

THEN BAD DATA IS POINTED TO BY 2C(R1) 
GOOD DATA IN DATBUF +2 


TRAP 

BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
HEN BAD DATA IS POINTED TO BY (R1) 

GOOD DATA IS A ZERO BYTE 


TRAP 
BYTE TEST 
BAD ann RIGHT BYTE OF RO UNLESS ABORTED 


AD DATA IS POINTED TO BY (Ri) 
GOOD DATA IS A BYTE OF ONES 


TRAP 
BAD DATA IN RO UNLESS ABORTED 


SEQ 0351 


CVMJABO MSV11-J MEMORY DIAG. 
ERROR DATA SETUP 


- 


MACRO YOS. 


PERR14 


PERR1iS 


PERR16 


PERR17 


PERR2O 


PERR21 


PERR22 


PERR2S3 


PERR24 


PERR2S 


PERR26 


THEN BAD DATA 
GOOD DATA IS ZERO 


TRAP 

BAD DATA_IN RO UNLESS 
HEN BAD DATA 

GOOD DATA IS ONES 


eS 
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IS POINTED TO BY (R1) 


ABORTED 
IS POINTED TO BY (R1) 


TRAP 
BAD DATA_IN RO UNLESS ABORTED 


THEN BAD DATA 
GOOD DATA IN TSTDAT 


IS POINTED TO BY C(R1) 


TRAP 
BAD DATP._IN me a eee ABORTED 


THEN DATA 
GOOD DATA IN TSTDAT+2 


TRAP 

BAD DATA_IN RO UNLESS 
THEN BAD DATA 

GOOD DATA IN R2 


TRAP 

BAD DATA_IN RO UNLESS 
THEN BAD DATA 

GOOD DATA IN R3 


TRAP 
7 BIT BYTE TEST 
BAD arn RIGHT BY 


IS POINTED TO BY CR1) 


ABORTED 
IS POINTED TO BY (R1) 


ABORTED 
IS POINTED TO BY CR1) 


YTE OF RO UNLESS ABORTE 
DATA IS POINTED TO BY cri) 


GOOD DATA IS A 7 BIT BYTE ON ONES 


TRAP 
BAD DATA_IN R2 UNLESS ABORTED 
THEN oy DATA IS POINTED TO BY C(R1) 


GOOD DATA IN 


BAD DAT’ IN RO UNLESS ABORTED 
BAD DATA IS POINTED TO BY (R1) 


THEN 
GOOD DATA IN R4 


TRAP 
BAD an RO UNLESS 


ABORTED 
BAD DATA IS POINTED TO BY (R2) 


GOOD DATA IN RS 


BAD. DATA POINTED TO BY -C(R1) 


GOOD DATA IN Re 


UNLESS LOC V177654 IS SET 


THEN GOOD DATA IS IN RS 


BAD DATA IS DOUBLE es POINTED TO BY R1 AND IN LOW 7 BITS OF RO 


GOOD DATA IS 000000, 





SEQ@ 0332 


a ~~ - + eed 


wm ee 
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ERROR DATA SETUP 


1203) - 
15883 sae 
654 
12655 
2656 PERR3SO 
1<8 7 
12859 
12660 PERR31 
12661 
PERR32 
PERR33 
PERR34 
PERRSS 
CALLING 
i387 BERRXX 
12878 2s: NEXT 


OO EEE TTT TT LLL LLL \nsestne~tse—eenenenweee 
pot pt ee a be pe pepe 
~ TT MRM 
SSSSES SEE ee eR eeeEeeS 
Na Oooo~ 


TRAP 
BAD DATA IS DOUBLE WORD POINTED TO BY R1 AND IN LOW 7 BITS OF RO 
GOOD DATA IS 000000, ,000000, ,077 


TRAP 
BAD DATA IS POINTED TO BY -16(SP) 
GOOD DATA IS IN Ri 


TRAP 
SPECIAL ECC FAILURE HANDLER 
TRAP 
SPECIAL ECC FAILURE HANDLER 
TRAP 
SPECIAL ECC FAILURE HANDLER 
TRAP 
SPECIAL ECC FAILURE HANDLER 


TRAP 

SPECIAL BRANCH GOBBLE FAILURE HANDLER 
SEQUENCE FOR TRAP TYPES 

2$ BRANCH a CARD 


ERROR 
TRAP TO ERROR ROUTI 
INSTRUCTION ‘CONTINUE TESTING 


SEQ OF" 


——————— ne 


—_ es re” 
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ERROR DATA SETUP SEQ 0354 


LL. 





12695 y ob 


egess 


~ 
~~ 
ro 


047 
047 
047 
04 
O4 
04 
04 
O4 
04 
04 


12694 
13897 
te 
eS 
13906 


7 
016137 
000137 


010137 
010237 
013737 
000137 
010137 
062737 
010237 
013737 
000137 


010137 
010037 


005037 
000137 


602034 


002034 


00203. 


002052 


002034 


002034 


sPERO1: 


$PERO2: 


$PEROS: 


$PERO4: 


PERROS: 
PERAOS: 


PERROG : 


$PERO7: 


$PER10: 


$PER11: 


$PER12: 


MOV R4, ADDRESS 
SUB @2. ADDRESS 
MOV BAD 

MOV R5. GOOD 
JMP PERRAW 

MOV R4, ADDRESS 
SUB @2. ADDRESS 
MOV Ri. 

MOV R2, 

JUMP PERRAW 

MOV R1, ADDRESS 
SUB @2. ADDRESS 
MOV 

MOV -2(R1),BAD 
JMP PERRAW 

MOV RO, ADDRESS 
SUB @2. ADDRESS 
MOV 4.8 

MOV R2 

JMP PERRAW 
OY "F488 
MOV , ADDRESS 
ADD RO ;RESTORE RO 
CALL § BADSTACK 
RETURN 

CLR GOOD 

BR PERAOS 

MOV R1, ADDRESS 
MOV R2.BAD 

MOV DATBUF , GOOD 
JMP PERRAW 





LET ADDRESS := R1 + 62 


LET BAD := R2 
LET GOOD := DATBUF +2 


JMP 


LET ADDRESS 


PERRAW 
:2 RI 


LET BAD := RO 
LET GOOD := #0 


JMP 


LET ADDRESS 


PERRAB 
:2 RI 


MOV R1,ADDRESS 
ADD #2,ADDRESS 


MOV R2.BAD 
MOV DATBUF +2,G000 


MOV R1,ADDRESS 
MOV RO.BAD 
CLR GOOD 





ee -—— — 
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ERROR DATA SETUP SEQ 0335 
047644 010137 002034 MOV R1, ADDRESS 
12931 047650 LET BAD := RO 
| 7 010037 002052 MOV RO.BAD 
«42932 047654 LET GOOD := 0377 
047654 012737 000377 002044 | MOV #377.GO00 
| 12933 047662 906137 050172 JMP PERRAB 
| 
| 
— 
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$PER22: 


LET ADDRESS := Ri 


ERROR DATA SETUP SEQ 0356 
$PER13: LET ADDRESS := Ri 
010137 002034 MOV R1,.ADORESS 
LET BAD := RO 
010037 002052 MOV RO.BAD 
LET GOOD := #0 
005037 esgess CLR GOOD 
000137 120 JMP PERRAW 
$PER14: LET ADDRESS := Ri 
010137 002034 MOV R1, ADDRESS 
LET BAD := RO 
010037 002052 MOV RO.BAD 
LET GOOD := ONES 
033737 002614 MOV ONES .GOOD 
000137 050 JMP PERRAW 
$¢PERIS: LET ADDRESS := R1 
010137 002034 MOV R1. ADDRESS 
LET BAD := RO 
€10037 MOV RO.BAD 
LET GOOD := TSTDAT 
048737 002246 MOV TSTDAT GOOD 
137 050120 JMP PERRAW 
SPERIG: LET ADDRESS := Ri 
010137 002034 MOV R1, ADDRESS 
LET BAD := RO 
010037 002052 MOV RO.BAD 
LET GOOD := TSTDOAT+2 
013737 002250 MOV TSTDAT+2.GO000 
000453 BR PERRAMW 
— = $PER1I7: LET ADDRESS := Ri = - 
010037 002052 ee MOV RO.BAD 
essent LET GOOD := R2 - 
ososa4 BR PERRAW 
$PER20: LET ADDRESS := Ri 
010137 002034 MOV R1,ADORESS 
010037 002052 er ays MOV RO,.BAD 
LET GOOD := RS 
010337 002044 MOV R3,GO0D 
000435 BR PERBRAW 
$PER21: LET ADDRESS := Ri 
010137 002034 MOV R1,. ADDRESS 
LET BAD := RO 
010037 002052 MOV RO.BAD 
LET GOOD := #177 
012737 000177 002044 MOV #177,G000 
000477 BR PERRA7T 


ee 


12972 
73 


1297 





129 
74 

He 
76 


7 


fetal 


010137 
010237 


eae Ho 

16 
010137 
010037 


7 
010237 
010037 


$PER24 : 





MACRO YOS.02 Monday 07-Oct-85 16:57 Pege 397-1 


LET BAD := R2 
LET GOOD := RO 
BR PERRAW 
LET ADDRESS := Ri 
LET BAD := RO 
LET GOOD := R4 
BR PERRAW 
LET ADDRESS := R2 
LET BAD := RO 
LET GOOD := RS 
BR PERRAW 


MOV R1, ADDRESS 
MOV R2.BAD 
MOV RO,GOOD 


MOV R1, ADDRESS 
MOV RO,BAD 
MOV R4,G000 


SEQ 0337 





VMJABO MSV11-J MEMORY 
CROR DATA SETUP 
12986 050120 
12987 050120 004737 
Gso134 005737 
130 001 
132 004737 
136 
12989 0501 
136 005737 
142 001 
144 004737 
12990 050150 004737 
12991 0501 
154 005737 
1 Ae LosOlL 
13508 o50i64 
164 000401 
166 
12994 050166 104012 
12995 050170 
12996 050170 000002 
12997 
12998 050172 
1 050172 004737 
: 050176 
176 005737 
001402 
004737 
10 
13001 10 
10 005737 
14 001002 
16 004737 
1 = 004737 
i3008 
005737 
00100 
13004 34 104014 
13005 36 
36 000401 
13006 104015 
13007 050242 
050242 
13008 050242 000002 


DIAG. 


002144 
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PERRAW: SUBTST <<DATA WAS A WORD>> 
§ SSESHE SESEESESSEEEEESEEEEEEESEEEEAEESEEESESESEEESEAEEEEESESESESEESESESSSESEEEEEEESEEES 


:*SUBTEST DATA WAS A WORD 


§ SHHSAAEASSSSSEAESSHEASEESESEESEAERESEESEESESEEAESESESEEESEEEEEEESESSESSEESESESEES 


CALL PERBNK 
IF ABORTFLAG IS TRUE THEN $CALL GETDATA 
TST ABORTFLAG 


L 
JSR PC.GETDATA 
L440: issaas 


TST BADPC 

BNE 1441 

JSR PC ,.BADSTACK 
L441:isssss 


IF BADPC EQ @0 THEN $CALL BADSTACK 


CALL PERXOR 

IF ABORTFLAG IS FALSE 
TST ABORTFLAG 
BNE 1442 


ERROR +11 
ELSE 
BR L443 
L442: iss33% 
ERROR +12 
END ;OF IF ABORTFLAG 
L443:isisse 


RTI 
PERRAS: SUBTST <<DATA WAS A BYTE>> 


j CRROSOSEEEEESESEASESESESEEREREOEEESEEREEEEE ESOS SESESEEESESSESESSESESEESEEOEEEOSS 
;*SUBTEST DATA WAS A BYTE 


§ SSSHSHAASASSSHSESEHSSSSSSSSSSSESESESSSESSEESESESHSESSSESESSESESESSSESSESESESESSESSEESESSESSEES 


CALL PERBNK 
IF ABORTFLAG IS TRUE THEN $CALL GETDATA 
TST ABORTFLAG 


BEQ L444 
JSR PC.GETDATA 
L444: 3.553% 


TST BADPC 

BNE L445 

JSR PC .BADSTACK 
L445:isssee 


IF BADPC EQ #0 THEN S$CALL BADSTACK 


CALL PERXOR 

IF ABORTFLAG IS FALSE 
TST ABORTFLAG 
BNE 1.446 


ERROR +14 
ELSE 
BR L447 
L446: icseis 
ERROR +15 
END ;OF IF ABORTFLAG 
L447:sseaae 


RTI 


SEQ 0338 


A a. ~<a. ee 


- —— —_— er ee ee ee eee ee 


- —— er eee ee a a ee ee ee me me os 


Sxta‘tas a erie 


13011 050244 


; 


88 6 @+4OVaw 
TT 
Sere Sssan 2 


13027 


é 
genagaas © § 9998 


Bestsees 


13032 


nn _—-- 


005037 
012737 
000137 


010046 
013700 
013737 
074037 
012600 
000207 
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PERRA7: SUBTST <<DATA WAS A 7 BIT BYTE>> 
| SOSOAOSESEESESEEEESEEESEEESESSESESSEEEEESEEESSESESSEEAEEESEESEESEEEEESEEEEOEEEOOEE 


; SUBTEST DATA WAS A 7 BIT BYTE 
| POSSSSHEEEEAEEESEESESSESEESEERESEOEEESESEEESESEDESEEESESEESEEESESOEEDSSE 1OSSCO866 


F BADPC EQ #0 THEN $CALL BADSTACK 
TST BADPC 


BNE L450 
JSR PC ,.BADSTACK 
L4S0:sssaee 


RTI 

$PER26: LET GOOD2 := #100000 
LET GOODS := #100 
JMP PERRAS 


$PER27: CLR Goode 
LET GOODS := 9077 


JMP PERRAS 
PERXOR: SUBTST <<DETERMINE XOR OF GOOD & BAD>> 


——— i ———_—1t.tt. 


MOV #100000 ,G00D2 
MOV #100,G0005 


MOV #077,G00035 





;*SUBTEST DETERMINE XOR OF GOOD € 
s SSSSHSSSHEESSSESHESESESSSESESEESESAEESSSESESAESSSESESESESSESESSEESSESSSESSSSESESSESESESSEESSS 
MOV RO, -CSP) 
GOOD ,RO 
MOV BAD, BADXOR 
XOR RO, BADXOR 
POP RO 
MOV (SP)+,RO 
RETURN 


SEQ 0359 


CVMJABO MSV11 
DETERMINE XOR 
13035 050354 
13036 
13037 334 
130 

eit at 
13040 

135041 9 
: 376 
Hse 

i 6 
i 

13046 

He ce 
es Sisees 
t 

13053 50 
Hess Sass 
$5 


2 
72 
3059 
3060 
sot sassss 
ross S883 
1306 +6 
13064 14 
14 
13065 
13066 
13067 050542 
13068 050544 


OF 


023737 
pat as 
013737 
000405 
013737 


004737 
012737 
000207 
sat 
ated 


-J MEMORY DIAG. 
GOOD € BAD 


177777 


050330 
177777 


002300 


034040 
050434 


eee ae 
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002554 


002412 


002612 


000011 


PERBNK: SUBTST<<LOG ERROR ON BAD BANK>> 


;*SUBTEST 


LOG ERROR ON BAD BANK 


3 SSHSSSSSSSESSSASESSSSESSESESSSSESSHSSSSSSSHSSSESSSSSSSSESESSESSESSSSESHSHSSSSESESESESESEES 








BANK .R1 
Ri 
Ri 
@BITO, CONFIGCR1) 
CONF IG+2(R1) ;B8UMP BANK COUNTER 
12% :NO OVERFLOW - SKIP 
CONF IG+2(81) ;SET BACK TO 255. 
128: CONF IG+2(R1),. ERRMAX ;IS IT PAST MAX? 
11% : - SKIP 
TOOMANY ;YES 
118: R1,RO 
RETURN 
PERECC: MOV RO,BAD 
IF ADDRESS EQ TESTADD 
MOV TSTDAT,.GOOD 
ELSE 
L451: 
MOV TSTDAT+2,G000 
END ;OF IF C(R1) 
L452: 
CALL PERXOR 
SET HEADER 
RETURN 
$PER3S1: IF REALPAT EQ #41 
ERROR +23 
END 
L453: 
IF BADPC EQ @O THEN $CALL BADSTACK 
L454: 
CALL PERECC 
IF REALPAT EQ #11 


ERROR +37 
END ;OF IF REALPAT 





; WHILE — LET'S MARK THE BAD BANK IN THE CONFIGURATION TABLE 


MOV RO, -CSP) 
MOV R1,-CSP) 


MOV #-1, TOOMANY 


MOV (SP)+,R1 
MOV (SP)+,RO 


CMP 
BNE 


BR L452 
eee Ee 


MOV @-1,HEADER 


CMP 


REALPAT , 041 
BNE L453 





L4 
PC ,BADSTACK 


REALPAT ,@11 
L455 


SEQ 0340 


ADORESS . TESTADD 
L451 


ES LE A ——<_ eae 


Cyeaee Sy Sa. DIAG. 


13069 
os0sa4 rs £4 Y 002300 


001 
13070 104043 
13071 3 
13072 36 
023727 
001001 
13073 
13074 te] 
70 
13075 70 
70 012737 
13076 76 000002 


177777 
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000015 


000016 


002612 


me mm a ee 


IF REALPAT EQ #15 


ERROR +43 
END ;OF IF REALPAT 
IF REALPAT EQ #16 
ERROR +44 
END ;OF IF REALPAT 
SET HEADER 
RTI 


L455:sssaaa 
CMP REALPAT,@15 
BNE 1.456 


L456: issaes 
CMP REALPAT,@16 
BNE L457 
L4S7:sssaes 
MOV @-1,HEADER 


SEQ 0341 


13079 050600 


Site Sis Bile 


hee Beeeee 
33 333338 


ee 
AD 


~ 


eee 
en 
a8 
a > 


050732 
34 


3 051006 
4 051012 


CVMJABO MSV11-J MEMORY 
LOG ERROR ON BAD BANK 


010137 
010037 
010237 
012737 
104040 


012737 
000902 


012737 
104041 


012737 
000002 


032737 
001002 
104016 
000401 
104001 


DIAG. 


002022 
034040 
002034 
002052 
002044 
177777 


177777 


177777 
177777 
002022 
034040 


100020 


ee 
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002612 


002612 


002044 
002612 


002612 


002150 


002052 
002044 


$PERS3: 


SEQ 0342 


$PCR3S2: IF BADPC EQ #0 THEN $SCALL BADSTACK 


TST BADPC 

BNE L460 

JSR PC ,.BADSTACK 

L460: sis55% 

MOV R1,ADDRESS 
MOV RO,.BAD 
Ser NEADER 

MOV o - 1 . HEADER 
SET. HEADER 

MOV r+] - 1 = HEADER 
RTI 
IF BADPC EQ @0 THEN $CALL BADSTACK 

TST BADPC 

BNE L461 

JSR PC ,BADSTACK 

L461:ississ 

MOV R1,ADDRESS 
MOV RO,BAD 
CLRB BAD+1 
MOV #377 ,GOOD 
CALL PERXOR 
SET HE R 

MOV #-1,HEADER 
ERROR +41 
SET ADER 

MOV @-1,HEADER 
RTI 


$PER3S4:IF BADPC EQ #0 THEN $CALL BADSTACK 


$PERSS: 





TST BADPC 


BNE L462 
JSR PC ,.BADSTACK 
L462: isis: 


BIT #BIT1S!BIT4,CSR 
BNE L465 


IF @BITiIS!BIT4 OFF.IN CSR 


ERROR +16 
ELSE 


;NO SBE OR DBE 
BR L464 
L463:sic333 


ERROR +1 ;EXPECTED SBE SO DBE MUST HAVE GOTTEN SET 
END ;OF IF #BIT15!:BIT4 


L464: ssisii 
RTI 
DURING BRANCH GOBBLE THE CONDITION CODES WERE WRONG 
CALL PERBNK 
CALL § BADSTACK 
MOV BADPSW, BAD 
MOV #12,G00D 
ERROR +47 
ADD SP ;FIX STACK FROM TRAP 
RETURN ;ABORTING TEST 


meme ee mh 


ce e_ses»»»»==seeheththhhsh hha thst voter steers nnn Sn 
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LOG ERROR ON BAD B SEQ 0343 
tie 1014 010037 002044 $PER36: MOV RO,GOOD 
+3ii$ 631030 010137 002052 * MOV Ri, BAD 
13118 051024 SET R 
051024 012737 177777 002612 MOV @-1,HEADER 
13119 051032 104023 ERROR +23 
13120 051034 SET HEADER 
051034 012737 177777 002612 MOV @-1,HEADER 
13121 051042 000002 RTI 
13123 051044 104053 $PER37: ERROR +53 ;ILC;;REV B 
13124 051046 000002 RTI ;ILC;;REV B 
13126 051050 104054 $PER40: ERROR +54 ;ILC;;REV B 
13127 051052 000002 RTI ;ILC;;REV B 
ihe eens 
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ROUTINE SCOPE HANDLER SEQ 0344 
13130 ROUTINE SCOPE HANDLER 
«4431 yy ee eae eee 
13338 3#THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
1313 ;@#AND LOAD THE DISPLAY DATA INTO THE DISPLAY REGIST ER 
13134 : eTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE AR 
13135 ;*#SW1i4=1 LOOP ON TEST 
13338 ;#SW9=1 LOOP ON ERROR 
13137 ; #CALL 
13156 ;* SCOPE ;;SCOPE=IOT | 
13139 051054 005237 056726 $SCOPE: INC $DEVCT ;TELL APT WE ARE ALIVE ' 
13140 051060 IF RESULT IS LT 
051060 BGE L465 | 
13141 051062 37 056726 CLR sDEVCT | 
13135 051066 105237 056730 INCB $UNIT 
13143 051072 END ;OF IF RESULT 
Osi ers Sig eeees 
13144 1072 104410 CKSWR 3;TEST FOR CHANGE IN SOFT” S 
13145 1074 005737 006304 TST TRACE | 
itt 1100 001402 BEG NOTRCE 
1314 1102 ¢04737 055222 CALL CONTT 3; TRACE 
13148 1106 NOTRCE : 
13149 1106 0057 052364 TST CPERRF :I1S THERE A CPU ERROR REGISTER? 3R-C 
tetas 11i2 001410 BEQ KJ ;BRANCH IF NOT 3R-C 
13151 051114 013737 177766 052362 MOV 80177766 ,CPSAVE SGET CONTENTS o ERROR REGISTER 3R-C 
131 Oat tee 032737 000001 052362 BIT #BITO,CPSAVE :I1S THE POWER FAIL MONITOR BIT SET? 3R-C 
131 0511 001401 BEQ SKJ : IF NOT 3R-C 
131 051132 104177 ERROR 177 ;sREPORT IF SO sR-C 
13163 051134 SKJ: IF STOPOK IS TRUE AND esa SET.IN &@SWR 3R-C 
051134 005737 002420 TST STOPOK 
051140 001410 BEQ L466 
051142 032777 000400 131466 BIT @SW8.3SWR 
051150 001404 BEQ@ L466 
3164 0511 005037 002420 CLR STOPOK 
13165 051156 000137 040512 JMP EXIT 
13166 1162 END ;OF IF STOPOK 
11 L466:sssie3 
13167 051162 IF NOSCOPE IS TRUE 
051162 005737 002440 TST NOSCOPE 
0511 001401 BEQ L467 
13168 O51170 000002 RTI 
13169 051172 END ;OF IF NOSCOPE 
1172 L467:sissee 
13170 051172 1%: IF @SWi4 SET.IN @SWR THEN GOTO $SOVER 
051172 032777 040000 131436 BIT #SW1i4,8SWR 
001051 BNE sOVER 
13171 s@G@GGOSTART OF a FOR THE XOR He et 
eee 051202 000425 $XTSTR: BR ;1F RUNNING ON THE . wie ta CHANGE 
1317 + THIS oe eee AB TO A “ (NOP =240) 
13174 051204 013746 0v0004 MOV ERRVEC, -( SP) 33SAVE THE CONTENTS OF THEE ERROR VECTOR 
13175 051210 012737 051230 000004 MOV 1% ,-ERRVEC :3SET FOR TIMEOUT 
13176 051216 005787 177060 TST 177060 ;; TIME OUT ? 
13177 OS5i2z22 012637 000004 MOV (SP)+, ERRVEC ; sRESTORE THE ERROR VECTOR 
13178 051 000430 BR $SVLAD +490 TO THE NEXT TEST 
13179 0512 062706 000004 i$: ADD 04 .SP sFIX STACK FROM TRAP 
131860 051234 022737 000005 004064 CMP #5 ,,PROTYP :IS THIS AN 11/83 ? 
13181 051242 001002 BNE TBR H IF T 
131862 051244 005037 177766 CLR CPVERR ‘RESET CPU ERROR REGISTER 





eae a 
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sc HANDOL 


ROUT INE ER SEQ 0345 
13183 051250 012637 000004 63: MOV CSP)+,ERRVEC s sRESTORE THE ERROR VECTOR 
13184 051254 000407 BR OOP ON THE PRESENT TEST 
13185 05 2$:;Q0008END OF CODE FOR THE XOR TESTERSSeee 
131 105737 002014 $$; 1ST8  —« SERFLG +;HAS AN ERROR OCCURRED? 
13187 001412 BEQ $SVLAD ; BR 
18188 051264 032777 001000 131344 BIT @SW9, BSWR :LOOP ON ERROR? 
13189 72 901404 BEQ S$ ;36R IF 
131 12374 013737 002624 002622 4%: MOV SLPERR.$LPADR 1;:SET LOOP ADDRESS TO LAST SCOPE 
13191 051 090410 BR SOVER 
13192 051304 105037 002014 S$: CLRB = $ERFLG +3ZERO THE ERROR FLAG 
13193 051310 011637 002622 $SVLAD: MOV (SP), $LPADR ;TSAVE SCOPE LOOP ADDRESS 
13194 051314 011637 002624 MOV (SP); $LPERR + SSAVE ERROR LOOP ADDRESS 
13195 051320 LR TICLEAR THE ESCAPE FROM ERROR ADDRESS 
13196 051 004737 051336 $OVER: CALL  GETDIS 
13197 051330 013716 002622 MOV SLPADR, (SP). ;;FUDGE RETURN ADDRESS 
13198 051334 000002 RTI SIFIXES PS 
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ROUTINE SC HANOLER SEQ 0346 
13200 051336 GETDIS: SUBTST <<SUBR ODISPLAY>> 
3 SESSERASESSSESSSSSESAASSSSESSSASSEAESESSASSESSSSSEHESSSEHSESESEESESSEESESSEESESESEESEEESEEESEDE 
3; *SUBTEST SUBR DISPLAY 
| SHASSSSEESSSAESSESSESAESESESEESEESESEEEEESEEESESESEAESEESESESESESEESESESEEHESESESEEES 
13201 051336 113737 002102 0020135 MOVB BANK , $BANK 
13308 1344 113737 002300 002012 MOVB REALPAT, $PATMAR 
1 1352 PUSH RO 
1352 010046 MOV RO, -CSP) 
1 : S4 005737 002126 TST RLFLAG ;ARE WE RELOCATED? 
1 001403 BEQ i$ ;NO - SKIP 
: : $3 052737 100000 002012 ia BIS #B81IT15, $PATMAR ;YES - SET MSB 
13211 1370 013777 002012 131242 MOV $PATMAR , BDISPLAY 
ete | 1376 013737 002012 000174 MOV $PATMAR ,DISPREG ;SOF TWARE DISPLAY REGISTER 
1321 404 POP RO 
1404 012600 MOV (SP)+,.RO 
13214 051406 000207 RETURN 


ee 
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ROUTINE ERROR SEQ 0347 


13217 
13218 
13219 
13220 
13221 
1322 


2 
tas 


Be 


tata ata tata tata ta tata 
SeeeSSuSS 
~ 


1 
A 
1430 
1434 
13243 051436 
13244 051440 
13245 051440 
i 1444 
1334 O51452 
13249 051460 
eet 051466 
13251 051470 
051470 
13252 051474 
051474 
13233 pete rey 
i oat 
sass St 
13256 ete tet 
ost 14 
13257 051514 
use Sth 
Hass 
13260 051 
13261 051 
: 051540 
13264 pet ior 
13265 teee 
13266 051556 
13267 051562 
13268 051564 
13269 051570 


104401 
005237 


1000035 
012737 
011637 


117937 
122737 


0026350 


077777 


056722 
131150 


002630 


002020 


002030 
002015 
002015 





-SBTTL ROUTINE ERROR 
jOonensesessscosesonsssosoesosooesonsesoocsassossooescooecooonetceesscoeseseess 
s#THIS ROUTINE WILL T ERROR FLAG AND THE ERROR COUNT, 
s#SAVE THE ERROR ae NUMBER AND THE ADDRESS OF THE ERROR CALL 

;#AND GO TO SERRTYP ON 
ieTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


3*#SWi HAL 
3*#SWi3-1 INHIBIT ERROR TYPEOUTS 
3#SW10°1 BELL ON ERROR 
—, LOOP ON ERROR 
;* 
3% ERROR WN ;:;ERROR=EMT AND N=ERROR ITEM NUMBER 
-ENABL LSB 
SERROR: TST UF OF LG 33K ARE WE IN UFD MODE 
BEQ KAL 33K IF NOT OO NOT TRY ABORT 
CLR RO 33K ELSE CLEAR CNTRL Z AND C AND 
JSR PC ,ABORT 73K CHECK FOR UFD ABORT 
KAL : CLRB IBSAVE 3R-C 
IF NOERROR IS FALSE 
TST NOERROR 
BNE L470 
CKSWR ;;TEST FOR CHANGE 1N SOFT-SWR 
BACK: ;R-C 
1%: INCB sERFLG ;SET THE ERROR FLAG 
BEG i$ DON! T LET THE FLAG GO TO ZERO 
CALL GETDIS :SE TUP DISPLAY STUFF 
MOV SPATMAR ,$TESTN ‘FOR APT 
BIT @SW10, @SWR + ON ERROR? 
BEQ 28 IP 
T sBELL + +RING BELL 
TYPEIT ,$BELL 
.0S CRF 
TY MSG014 sCONTROL Z 
TYPEIT ,.MSGO14 
.0S car 
23: INC sERTTL ;;COUNT THE NUMBER OF ERRORS 
IF RESULT IS MI 
BPL L471 


MOV @77777, SERTTL 


END ;OF IF RESULT 
END ;0F IF NOERROR 


L471l:isssss 


L470: 
+;GET ADDRESS OF ERROR INSTRUCTION. 


MOV (SP), ERRPC 
SUB é2. ERRPC 
MOV 
MOV 236), ERRPSW 
MOVB RRPC, $ITEMB ;;STRIP AND SAVE THE ERROR ITEM CODE 

#177, $ITEMB :IS THIS THE POWER FAIL CALL? ;R-C 
BEQ 1001$ ;BRANCH IF SO ;R-C 
TS18 IBSAVE ;2ND ERROR CALL? ;R-C 
BNE 1000$ BRANCH IF SO ;R-C 
TST CPERRF ;IS THERE A CPU ERROR REGISTER? ;R-C 
BEQ 1001$ ;BRANCH IF NOT :R-C 
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ROUTINE ERROR HANDLER SEQ 0348 
13270 051572 013737 177766 052362 MOV 177766 CPSAVE ‘SAVE, CONTEN :R-C 
13571 051600 032737 000001 052362 BIT 0. CPSA R. RONT TOR BIT SET? ;R-C 
13272 051606 001414 BEQ To01¢ ;BRANCH I :R-C 
13273 051610 042737 000001 177766 BIC @BITO, 177766 ;CLEAR The ert ;R-C 
13274 051616 112737 002015 052360 MOVE @SITEMB.IBSAVE {MAKE IBSAVE NON-ZERO FOR DUAL CALL :R-C 
! 75 esis 4 112737 000177 002015 Hove 0177, sTTEMG ;SET $ITEMB TO POWER FAIL POINTER iR-C 
i a 
13277 051634 105037 052360 1000$: CLRB $$ IBSAVE :R-C 
13278 051640 10018: sR-C 
13279 051640 IF NOERROR IS FALSE 
1640 005737 002430 TST NOERROR 
1644 001043 BNE L472 
13280 051646 IF BADPC NE #0 
1646 005737 002022 TST BADPC 
1652 001416 BEQ L473 
1 1654 013737 002022 002020 MOV BADPC, ERRPC 
1 1662 162737 000002 002020 SUB #2, ERRPC 
1 1670 013737 002026 002024 MOV BADSP, ERRSP 
i 1676 013737 002032 002030 MOV BADPSW. ERRPSW 
i 1704 002022 CLR BADPC 
13286 051710 ENO ; IF 
1710 L473:sssses 
13287 051710 013737 002020 056720 MOV ERRPC, $FATAL ;FOR APT 
13288 051716 004737 050354 CALL PERBNK :3L0G ERROR ON BANK 
. osiree 032777 020000 130706 ee ey Oe BIT @SW13,eSWR 
051780 001401 BEQ L474 
13290 051732 000420 BR 3% 
13291 031734 END ;OF IF @Swi3 
1734 L474:sssaei 
13292 051734 IF @SWS SET.IN @SWR AND TOOMANY IS TRUE 
051734 032777 000040 130674 BIT #SWS,@SUR 
1742 001404 BEQ L475 
settee isan m=" saa a 
13293 Osirss GOTO 33 
1752 000410 BR 33 
13294 1734 END ;OF IF @SuS 
i L4O7S:sssses 
13295 051 END ;OF IF NOERROR 
i L472:sss833 
13296 i 004737 052366 CALL SERRTYP ;:G0 TO USER ERROR ROUT 
13297 051760 IF MONFLG IS TRUE ;;SHOULD WE RETURN TO XXDP MONITOR??? 
1760 005737 002276 TST MONFLG 
1764 001403 BEQ L476 
1 051766 013706 002274 MOV SAVMON, SP ;:GET MONITOR ADDRESS 
1 1772 7 RTS PC ;:G0 TO MONITOR 
i3 051774 ND t3 
051774 L476:ii8e2% 


~— oe - 
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ROUTINE SEQ 0349 



















13302 051774 38: IF NOERROR IS FALSE 
774 002430 TST NOERROR 
90307 BNE L477 
13303 ¢ 777 13063¢ TST esuR ::HALT ON ERROR 
is ' 100002 BPL 7% 33;SKIP IF CONTINUE 
+s ‘ SHALT: ;;HALT ON § 
i 104410 CKSWR and test EST FOR CHANGE IN SOFT-SWR 
13307 ¢ 7%: IF NOSCOPE IS FALSE W9 SET.IN @SWR 
; 005737 002440 TST TST NOSCOPE 
; 001006 ONE L 
; 032777 001000 130606 BIT osus. ,@SuR 
901402 BEQ 
13308 ; 013716 002624 MOV of RERR.¢ SP. ;:FUOGE RETURN FOR LOOPING 
i ; END ; F NOSC " 
~ SOO:issass 
13310 ¢ 005737 002362 TST ‘sESCAPE ;:CHECK FOR AN ESCAPE ADDRESS 
13311 ¢ st tard BEQ 98 3;6R IF 
i »52¢ 013716 002362 MOV S€SCAPE,(SP) :3FUDGE RETURN ADDRESS FOR ESCAPE 
1331 SC 9%: IF DETFLAG IS FALSE 
952050 CO5S737 002220 TST DETFLAG 
»52¢ 001043 BNE LSO1 
13314 0S2c 022737 000005 004064 CMP #5,PROTYP :IS THIS AN 11/83 ? 
13315 0S2c 00 BNE 11% 
1 16 0520 177766 CLR CPUERR 
13317 oS52c 11%: IF ACTFLAG IS TRUE OR APTFLAG IS TRUE OR FATAL$ IS TRUE 
952072 005737 002350 TST — 
estos OoaTst 
952100 7 002352 
952104 001003 
952106 737 002064 
952112 001405 
952114 LSO2:ssssses 
i 18 952114 012737 000001 056716 MOV #1, $MSGTY sFOR APT 
i 95: 000137 040512 JMP x 
i Sz END ,OF IF ACTFLAG 
8; LSOS:ssssss 
13321 ¢ IF XXDPCHAIN IS TRUE AND SERTTL HI #20 
5; 005737 002354 TST XXDPCHAIN 
Hy 901414 BEQ L504 
95; 023727 002630 000020 CMP SERTIL. 20 
952142 101410 BLOS L 
13322 ¢ 32144 TYPE MSGO66 ;ERROR COUNT EXCEEDED 20 - ABORTING FOR XXDP CHAIN 
952144 104401 070121 TYpErT MSG066 
13323 130 013700 000042 MOV 42,RO0 
i : 005037 000042 CLR 
i 60 000137 013710 JMP $ZAP42 
i 164 END ;OF IF XXDPCHAIN 
164 LS5O4:ssesss 
13327 164 END ;OF IF DETFLAG 
i LSOL:ssasss 
13326 164 ELSE 
164 000403 BR LSOS 
166 L477:ssssae 
13329 166 SET HEADER 
1 012737 177777 002612 MOV @-1,HEADER 


13330 174 END ;OF IF NOERROR 


mm ere 


ee ee — 
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SEQ 0350 
LS5OS:ssaaas 
10%: CLEAR TOOMANY ,NOERROR 
ah 

TSTB IBSAVE :POWER FAIL ERROR CALL? ;:R-C 

BEQ 213% sR- 

JHP BACK ; JUMP IF SO iR- 
213%: RTI s sRETURN 





$ABORT 
.S8TTL ABORT ROUTINE FOR LCP/ORION UFD MODE 





















005737 003762 ABORT: TST :TEST FOR USER FRIENDLY MODE 
BEQ :IF NOT UFO THEN CONTINUE NORMAL OPERATION 
7 000032 CMP :1S IT A tz ? 
443 BEQ ; JUS BACK TO CHAIN IF IT IS (NO ERROR) 
7 000003 CMP 'Is IS A tC ? 
404 BEQ :8R TO LOAD tC ON XXDP « STACK (NO ERROR) 
737 003764 TST TEST FOR USER-QUIET MODE 
001443 BEQ ;IF FIELO-SERVICE MODE, CONTINUE NORMAL OPERATION 
; BE FIELO D-SERVICE HODE MODE DOES NOT GUIT ON ERROR 
052250 000422 BR ‘SET ORSERR THEN LEAVE 
000030 ABORTC: MOV ;RESTORE EMT LOCATION (30) 
000032 MOV ;RESTORE EMT PRIORITY LOCATION (32) 
EMT GET XXDP STACK LOC. INTO RO FROM MONITOR 
100%:  TSTB sFIND END OF STACK 
177777 — 3 OVER ZERO 
rove al 
MOVE su 
CLE smAK END TO STACK 
* 
000030 ABORTE: MOV ;REST TION (30) 
000032 HOV es BRIORTTY LOCATION (32) 
EMT :GET OCA LOCATION INTO RO MONI TOR 
000042 HOV :SET A -1 INTO L MONI TOR 
ABORTZ: MOV ;AND PUT oR IN RO 
CLR ‘CLEAR MONITOR 
wP TURN TO MONITOR-DO NOT PUSH STACK HERE 
NOABRT: RTS ;IF NOTUFD RETURN TO MAINLINE 
VE: oy 0 sR-C 
CaSAve Save: ‘ama Q ae 
‘DSABL. LSB 





—_— 


—<——_ee - - 


LLL OL OL 


ee re 
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ROUT INE ERROR MESSAGE TYPEOUT _ SEQ 0351 

13344 .SBTTL ROUTINE ERROR MESSAGE TYPEOUT 
13346 Cee ee eee ee eetee fittns th Ee ae 
13347 ;@THIS ROUTINE USES THE “ITEM CONTROL BYTE” ($ITEMB) TO DETERMINE WHICH 
13348 ;@ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE “ERROR TABLE” (SERRTB), 
13249 ;@AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 
13 : 052366 104415 SERRTYP : SAVREG 
13352 052370 TYPE sCRLF :: "CARRIAGE RETURN” & “LINE FEED” 

052370 104401 002660 TYPEIT ,$CRLF 

.OSABL CRF 
374 CLR RO :sPICKUP THE ITEM INDEX 
i 376 153700 002015 BISB sITEMB .RO 
i 1904 i$ ;;IF ITEM NUMBER IS ZERO, JUST 
i TYPE THE PC OF THE ERROR 
i TYPOCT ERRPC.<ERROR A éss 
013746 002020 MOV ERRPC, -(SP) SAVE ERRPC FOR TYPEOUT 

052410 104402 TYPOC GO TYPE--OCTAL ASCIICALL DIGITS) 
1355 i2 000511 BR $ Po 
i 14 122700 000177 is: CMPB 177,RO oteR "MONITOR CALL? ;R-C 
i ; > 001003 BNE 5 BRANCH IF 3R-C 
: 5. 012700 052676 MOV #PFECHS .RO ‘MOV ADDRESS OF PFE BIT ERROR TO RO sR-C 

'R- 
i 5< 005300 100%: DEC ;;ADJUST THE INDEX SO THAT IT WILL 3R-C 
1 ; ASL RO 7 WORK FOR THE ERROR TABLE 
13366 + 3 006300 ASL RO 
1 5244 005700 057344 ADD @SERRTB,RO + FORM TABLE POINTER 
13368 12037 052502 110$: MOV (RO)+,3$ PICKUP “ERROR MESSAGE” POINTER ;R-C 
i 369 ¥ 30 001417 BE 4s ; SKIP TYPEOUT IF NO POINTER 
13370 052 737 002430 ‘is THIS REALLY AN ERROR? 
1337 S56 001003 YES - SKIP 
1337 737 002612 ;TYPE HEADER? 
13373 052 100011 ;NO - SK 
13374 005737 002064 12$: ;WAS IT A FATAL ERROR? 
3 Be 2 001402 3 - Ie 
13376 052474 ;FATAL 

952474 104401 070170 
13377 2%: ::TYPE THE “ERROR MESSAGE” 

gss500 104401 
13378 052502 000000 33: :: "ERROR MESSAGE” POINTER GOES HERE 
13379 052508 3; "CARRIAGE RETURN” & “LINE FEED” 

104401 002660 

13380 10 012037 022534 43: ;:PICKUP “DATA HEADER” POINTER 
i &3514 00 412 ;;SKIP TYPEOUT IF O 
1 $ 908737 002430 FS THIS REALLY AN ERROR? 
1 001003 SKIP 
i 737 0026i2 TYPE “HEADER? 
13 100004 
13366 32 138: TYPE THE “DATA HEADER” 

0523532 104401 


+ “DATA HEADER” POINTER GOES HERE 
;"CARRIAGE RETURN” € “LINE FEED” 


sBTCKRe “DATA i PCINTER 
NO DATA TO BE TYPED 
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ROUTINE ERROR MESSAGE TYPEOUT 

13367 052534 000000 S$: WORD 0 

13386 36 TYPE $CRLF 

052536 104401 002660 TYPEIT .SCALF 

13389 052542 012001 63: MOV (RO)+,R1 

13390 052544 001427 BEQ 10$ 

13391 052546 012002 MOV (RO)+,R2 


3:BR IF 
; PICKUP “DATA FORMAT” POINTER 


SEQ 0352 


CVMJABO MSV11-J MEMORY DIAG. 
ROUTINE E 





112203 
30 

004775 

000412 


MESSAGE TYPEOUT 


052562 
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127770 


78%: 


98: 


108: 


11%: 








. EVEN 
052772 PFECWS: . 


127 
040 


116 
117 


PFECEM: 


PFECOH: 


.ASCIZ 


.ASCIZ 


CR2)+,RS 
@64(R3) 
9% 





PFECEM. PFECOH, PFECDT , PFECOF 
“POWER MONITOR BIT FOUND SET” 


“TESTNO ERR PC CPUERR” 





Page 414 


;MAKE IT A WORD ADDRESS 


;UPDATE DATA TABLE POINTER 
33;I1S THERE ANOTHER NUMBER? 


;;8R IF NO 

;TYPE 2 SPACES 

; ;LOOP 

;1S THERE A MEMORY UNDER TEST 
;NO - SKIP 

;YES - BUMP HEADER FLAG 


DETFLAG IS FALSE AND NOERROR IS FALSE 
BIT &SW7,.SSuR 


BE@ L 

TST DETFLAG 
BNE L506 
TST NOERROR 
BNE L506 


L506: sisss: 
:CONTROL Z 


;R-C 
;R-C 


7R-C 


;R-C 


SEQ 03555 


EE TT Lr 


— TT _ —— 
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ROUTINE ERROR MESSAGE TYPEOUT — EQ 0356 


052756 120 103 040 
052761 040 103 120 
052764 125 105 122 
052767 122 000 


13431 EVEN ? R-C 

13432 052772 056722 002020 052362 PFECDT: |WORD $TESTN.ERRPC.CPSAVE,O R-C 

13433 05 000 000 000 PFECDF: .BYTE 0.0.0.0 R-C 
o33008 000 , 


13434 


See MSV11-J MEMORY DIAG. MACRO YOS.02 Monday 07-Oct-85 16:57 Page 416 


TINE ERROR MESSAGE TYPEOUT SEQ 0355 


13437 | PEREESEEEEEEEEEEESSEEEEEESEEEEESSESEESESSESEEEESESESEESEEESEEESESEEEEEEEEEEEEEES 
13438 ;ee0 OCTAL eee 
13439 a a ene 
13440 053006 TAG70$: TYPOCT a@(Ri) TYPE AN OCTAL R 
3006 017146 000000 MOV @cRi),-CSP) ; SAVE @CR1) FOR TYPEOUT 
0530912 104402 ys CRF ‘GO TYPE--OCTAL ASCIICALL DIGITS) 
HE Prts 053014 000207 RETURN 
13443 { SASHES EESEEEEAREESEEEEEERESEASSEESESASEESESESEASSEEEESESEEEESESESESESEEEESEEEEDES 
13444 ;#e@ DECIMAL «ee 
13445 oe << 
13446 053016 TAG71$: TYPDEC @(R1) ;TYPE A DECIMAL R 
053016 017146 000000 MOV acRi),-CSP) ; SAVE acRi) FOR TYPEOUT 
3022 10440 is A ene 3:;GO TYPE--DECIMAL “ASCII WITH SIGN 
Eres 053024 000207 RETURN 
13449 j PEHERASEREESEESEESEERESEEEEESRSAERESSEAEEESESEESESEESESESSESEEESSSESESSESEEEEEESEES 
13450 3;#e@ INTERLEAVE ee 
13451 SEARAEAASASAAASASESEREAAEESEREAESESSESESERSEESESASESEESEESESEESESESEEESSEEEEESESEEEEEEES 
13452 053026 TAG72$: PUSH  R1,RS Se ai 
os3080 010546 MOV RS, -CSP) 
13453 053032 013701 002102 MOV BANK ,R1 
13454 053036 070127 09000004 MUL 04 ,R1 
13455 055042 SET NOTAB ; INDICATE NO TABLE TO BE PRINTED - NOW 
053042 012737 177777 =~O02372 MOV #-1,NOTAB 
13456 053050 TYPE 14 
053050 104401 066150 yes Y »MSG014 
13457 053054 004737 035272 CALL TCFIG1 
13458 053060 005037 002372 CLR NOT 
13459 053064 POP RS.R1 
053064 012605 MOV (SP)+,.R5 
3066 012601 MOV (SP)-,R1 
13460 3070 TYPE MSGO14 3:1 SPACE 
053070 104401 0661350 is? yy a 
Eat: 053074 000207 RET 
tees | SHSSSASEEASASESRSEAAREAE SES SASEHESEEEASSASESSESESEASSSEESEESESEESSEESSESESSSESESEEEE 
13464 ;4#e@ CSR se4 
13465 j SARARASSSESESESSEASARAESEAAREEEESESESESERERESSESSESEEESSSASESESESSSSESSEEEEESEESEEESE 
13466 053076 TAG73$: PUSH R1,RS 
053076 010146 MOV R1,-CSP) 
053100 010546 MOV RS, -< SP) 
13467 053102 0135701 002102 MOV BANK .R1i 
13468 053106 070127 0v0004 MUL 04 ,R1 
13469 112 SET NOTAB 
OS3ii2 012737 177777 002372 MOV @-1,NOTAB 
13470 053 004737 033466 CALL TCFIGS 
13471 05312 005037 002372 CLR NOTAB 
13472 0531350 POP RS.R1 
31 012605 MOV (SP)+,.RS 
053132 012601 MOV (SP)+,R1 
13473 053154 207 RETURN 


-_———— 
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SSAGE TYPEOUT SEQ 03556 


3 yg atc tei aaa nce eam 26644646646446466646466 
ae de eee 

: SESSSASAASASESSSSSSSESSESASSAESASESSSSEAESSESAEESSESESESESSESESESSESESHESSEEEHESESESEEEESSD 

4aG74$: TYPOCS REALPAT,.<TYPE (0-77)>.2.Z 


002300 MOV -REALPAT,-CSP) s sSAVE REALPAT FOR TYPEOUT 
3 — 
TYPOS ‘1GO TYPE--OCTAL ASCII 
‘BYTE 2 ‘iTYPE 2 DIGIT(S) 
BYTE 1 tt TYPE LEADING ZEROS : 
“DSABL CRF : 
TURN | 
3 SAAKEKASSASESSAESAHRASASASASAASSESAESSESSAEEEESESEEESEASESSESSEESSESESEEESSEEESESEEEESEEESEEE 


3;¢e¢ BANK ee0 | 
sieerrorareaeaerammapeenaateatenassessnnseasonnnaseqesoonsesescnsosonoqenscsenes 


AG75$: — BANK,<TYPE (0-176)>,3 





002102 MO BANK, -( SP) ;:SAVE BANK FOR TYPEOUT 
ss TYPE (0-17 
TYPOS 3:;GO TYPE--OCTAL ASCII 
.BYTE 3 ;;TYPE 3 DIGITC(S) 
BYTE O ;:; SUPPRESS LEADING ZEROS 
.DSABL CRF 
13485 053160 000207 RETURN 


2 ee ee = 


CVMJABO MSV1 
ROUTINE E 


13495 053210 
13496 053214 
13497 


goes 8883 


ES ee ee et he et pe pt et 
SeSeSeeeeeeeEes 


SAEBesE Re 
anuDro 
: 
% 
~ 


pat tt pat ee ee 
RWW uu 


J MEMORY DIAG. 


010146 
01 

013701 
070127 
012737 


162 
013737 
0062 


104401 


017146 


104403 
003 
001 


“MESSAGE TYPEOUT 


002102 
000004 


177777 
066162 
033332 
002372 


070037 


002034 
060000 
002102 
002042 
100000 
002040 
056576 
000002 


056704 


066157 
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002372 


s SOSESASSSSSESSESSSEESESAESESEAESESSEESSSESEESESESESESEEEESESESESEEESESEEESESESEEES 


;eee MTYPE ee0 
ee Oh alae eenemmanaa ana amammamame cmumnaiaetaa 


AG76$: R1,RS 

MOV Ri, -~CSP) 
MOV RS, -(SP) 

MOV BANK ,R1 

MUL 04,Ri 

SET NOTAB 
MOV @-1,NOTAB 

TYPE ™SGO019 

TYPEIT ,MSGO19 

.OSABL CRF 

CALL TCFIG2 

CLR NOTAB 

POP R5,R1 
MOV (SP)+,R5 
MOV (SP)+.R1 

RETURN 


§ SERAESAESSEAASSALSESSERALEAESESERESESSESESSESEESESESESSEEESESEESESESESESESESESESESESS 


;#ee UNKNOWN DATA ee0 
ns rn eneennnacnonsnnonnnesnseccosacnsnesotesesnesnsosnoses 


AG77$: TYPE MSGO61 
TYPE .MSG061 
.DSABL CRF 
RETURN 
| SESREREEEEEEERESEEEEEEEAEREEEEREEEEEEAEEEEEEEEEEDEEEEEEEEEEEEEEEEEEEE44E46464884 


3;#@e PHYSICAL ADDRESS «ee 


f SRESSHAKSHESSHSSASASSEASHSESSSSEESESESASEAASESSSASESLESASSESESESESSESESSESASHSESERESESES 


TAG78$: MOV ADDRESS , PHY 
SUB OF IRST,.PHYADD 
MOV BANK, PHYADD +2 
ASR PHY +2 
BCC 5 
BIS €B1T15,PHYADD 
1s: MOV ADD, -(SP) ;POINTER TO DOUBLE WORD ON STACK 
CALL $0820 ;CALL DOUBLE PRECISION CONVERSION ROUTINE 
ADD 02 SP ‘FIX STACK 


TYPE %$0C 
TYPEIT ,$0CT8 
.DSABL CRF 


fs SRESAASSHSASSSASEARERESSESESEHEEEASASESSEEASSSSSSASEAERSSS SAE SASSSSASSSSSESESSSSESSE 


3;#ae@ OCTAL BYTE ase 
See ae ea eae i * ene eenmemmmnamnts 


AG79$: TYPE MSGO1S :2 SPACES 
TYPEIT .MSGO18 
.OSABL ¢RF 
TYPOCS @(R1),<TYPE BYTE>,3.2 
MOV @cRi).-(SP) : 1 SAVE acR1) FOR TYPEOUT 
33 
TYPOS ::G0 TYPE--OCTAL ASCII 
BYTE 3 ;:TYPE 3 DIGITCS) 
"BYTE 1 ::TYPE LEADING ZEROS 


SEQ 0357 


—— I A 


CVMJABO MSV11-J MEMORY DIAG. 
ROUTINE E MESSAGE TYPEOUT 


13526 053330 
053530 104401 066150 


13527 053334 000207 


MACRO YOS.02 


Monday 07-Oct-85 16:57 


ABL CRF 

TYPE | _MSGO14 

TYPEIT ,MSGO14 
CRF 


Page 417-1 


; SPACE 


SEQ 0356 
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MEMORY DIAG. 
ROUTINE ERROR MESSAGE TYPEOUT SEQ 0559 





13571 053336 DETAIL: SUBTST <<SUBR DETAILED ERROR REPORT>> 
—— aL ———|.CmC. tS 
;#SUBTEST TAILED ERROR REPORT 
§ SSSSSESSSSSAESEASESESASEESSEEESESEASEESESEEESESEEEEEEESEEEEEEESSESESEESESESEESEESS 
13378 053336 37 002220 INC DETFLAG | 
053342 737 000003 002220 CMP @3,D0ETFLAG 
13574 3350 101473 BLOS 4 
13575 053352 737 000002 002220 CMP 62, DETFLAG 
13576 053360 001435 BEQ 
13577 053362 PUSH HEADER,MUT 
362 013746 002612 MOV HEADER -(SP) 
366 013746 002110 MOV MUT, -(SP) 
$72 SET HEADER 
72 012737 177777 002612 MOV @-1,HEADER 
3400 005037 002110 CLR MUT 
010037 002200 MOV RO, DETRO 
10 012700 002202 MOV @DETRi.R 
14 010120 MOV R1,(RO)+ 
16 010220 MOV R2,(RO)+ 
€10320 MOV R3.(RO)+ 
3422 010420 MOV R4_(RO)> 
10520 MOV RS, CRO)+ 
013720 002024 MOV ERRSP, (RO)+ 
013720 002030 MOV ERRPSW, (RO)+ 
3436 013700 002200 MOV DETRO,R 
i 3442 SET NOERR 
012737 177777 002430 MOV @-1,NOERROR 
50 104015 ERROR #13 
i 3 BR i$ 
23: PUSH HEADER,MUT 
053454 013746 002612 MOV HEADER, -(SP) 
053460 013746 002110 MOV MUT, -(SP) 
dade << 7+ 012737 177777 002612 - — MOV @-1,HEADER 
13595 safe 005037 002110 CLR MUT 
_ save 012737 177777 002430 ™ — MO NOERROR 
Vv @-i, 
13597 053 104031 ERROR +31 
13598 053 022737 000005 004064 CMP #5, PROTYP ;IS THIS AN 11/83 ? 
13599 053514 001002 BNE i$ 
13600 053516 37 177766 CLR CPUERR 
13601 053522 1$: POP MUT , HEADER 
053522 012637 002110 MOV (SP)+.MUT 
05 012637 002612 MOV (SP)+. HEADER 
1 WARNING RECURSIVE 
13608 053532 004737 053336 ALL DETAIL 
1 053536 000207 RETURN 


ee 





CVMJABO MSV11-J MEMORY 
SUBR DETAILED ERROR 
05 004737 
: O33 013746 
| 013746 
3554 010146 
104401 
104401 
013701 
005037 
6 006301 
3600 103006 
13619 053602 104426 
5620 Os3604 013746 
3610 104402 
13621 053612 
053612 104401 
13622 053616 
13623 o53et6 
gssere 005701 
001407 
13624 : 
023727 


013701 
162701 





DIAG. 
REPORT 


055222 
002150 
002152 


070015 


002150 


066157 


000002 
002152 





002574 
000002 


a re 
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002152 
000036 


4%: 


sSIMULATE CONTROL “T” 
CALL CONTT 





s;DISPLAY “DISPLAY” INFO 


;TYPE CONTENTS OF ALL CSR'S 
PUSH Csr ,.c Ri | 


MOV CSR, -CSP) 
MOV CSRNO, -(SP) 
MOV R1,-(SP) 
TYPE MSGOS8 
TYPEIT 
.OSABL CRF 
TYPE sCRLF 
TYPEIT $CRLF 
.DSABL CRF 
MOV TOTCSRS 
BEGIN DUMPCSRLOOP 
BlO2:ssisss 
FOR CSRNO := #0 TO #36 BY @2 
CLR CSRNO 
BilO3S:sissss 
ASL R1 
ON .ERROR 
BCC L507 
TYPOCT CSR 
MOV CSR, -CSP) 1 SANE CSR FOR TYPEOUT 
TYPOC +760 TYPE--OCTAL ASCIICALL DIGITS) 
DSABL CRF 
TYPE MSGO018 ;2 SPACES 
TYPEIT anpeete 
END ;OF ON.ERROR 
LSO7:ssssas 
IF Ri EQ #0 THEN LEAVE DUMPCSRLOOP 
TST Ri 
BEQ@ E102 
END ;OF FOR CSRNO 
ADD #2.CSRNO 
CMP CSRNO, 436 
BLE 81035 


ElL03S:sssssss 
El102:sssisi 


END DUMPCSRLOOP 


POP R1,.CSRNO,.CSR 
MOV (SP)+,.R1 
MOV (SP)+.CSRNO 
MOV (SP)+.CSR 
PY STACKS 
RO,R1 
MOV RO,-(SP) 
MOV Ri, -(SP) 
MSGO88 ;KERNEL STACK 
MSGO8S8 
KSTACK ,Ri 
@2,R1 


SEQ 0360 


ad 


———aee ee 


CVMJABO MSV11-J MEMORY 
SUBR 


DIAG. 


DETAILED ERROR REPORT 


13633 pete tt 


05367 

053674 

13634 053674 

053674 

136355 Ona 708 

3700 

053702 

13636 053704 

053704 

13637 053710 

3710 

3712 

13636 053714 

pe 3 Uk 

720 

3722 

33639 3724 

isea0 oases 
erat 37 

isea8 055740 

13644 746 

13645 730 

13646 053754 

3754 

13647 760 

760 

764 

13648 766 

766 

13649 053766 

766 

13650 772 

772 

3774 

13651 776 
776 


"eee 
ess sasaee 
054012 
054016 


010600 
104401 


010046 
104402 


002660 


066157 


066157 


000002 
000736 
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177776 
177776 


FOR RO := SP TO R1 BY @2 
MOV SP .RO 
BlO4:sisias 
TYPE sCRLF 
TYPEIT $CRLF 
érF 
T RO 
RO, -CSP) at oe | RO FOR TYPEOUT 
3:;G0 TYPE--OCTAL ASCIICALL DIGITS) 
MSGO18 32 SPACES 


* TYPOCT 0) 
MOV (RO), -(SP) ;sSAVE (RO) FOR TYPEOUT 
TYPOC 33G0 TYPE--OCTAL ASCIICALL DIGITS) 





.OSABL CRF 
END ;OF FOR RO 


E104: sssssss 
sae' PREVIOUS MODE TO SUPERVISOR 
T NOSUPER 








S 
BNE DET1 
BIC @B8IT13!:8IT12,.PSwW 
BIS @BIT12,.PSW 
MF PI SSP 
POP R1,RO 
MOV (SP)-,R1 
MOV (SP)+,RO 
TYPE mSGO89 ;SUPERVISOR STACK 
TYPEIT ,.MSGO89 
. DSABL 
IF RO LT @SUPSTK 
RO, @SUPSTK 
BGE L510 
FOR RO := RO TO @SUPSTK-2 BY #2 
BlOS:ssssss 
SCRLF 
;;SAVE RO FOR TYPEOUT 
3:G0 TYPE--OCTAL ASCIICALL DIGITS) 
s2 SPACES 
::SAVE CRO) FOR TYPEOUT 
3:G0 TYPE--OCTAL ASCIICALL DIGITS) 
ADD #2.R0 
CMP RO, @SUPSTK-2 
BLE 8105 





SEQ 0361 


"eee 

13668 i 
7 
i 

13669 f 
04 


13670 


13671 
13672 
13675 
Het 


13675 054124 


104401 


REPORT 


070462 
030000 


070446 


066157 


000002 
000676 


070462 


177776 DET1: 
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£.0 ERROR 


ElL0S:ssasass 


BR LS11 
LS51L0:ssasss 


ELSE 







TYPE M™SGO91 :;IS EMPTY 
yen Y »MSGO91 
END ;OF IF RO 
LSilssssses 
SET PREVIOUS MODE TO USER 
Is @61T13!81T12,PSW 
pA de usP 
MOV (SP)+.RO 
TYPE MSGO90 ;sUSER STACK 
ys MSGO90 


iF RO LT @USESTK 
chp RO. GUSESTK 


BGE L512 
FOR RO := RO TO @USESTK-2 BY #2 
B106:isissss 
;:;SAVE RO FOR TYPEOUT 
3:3GO TYPE--OCTAL ASCIICALL DIGITS) 
:2 SPACES 
T 
MOV CRO), -( SP) ::SAVE (RO) FOR TYPEOUT 
TYPOC 3:GO TYPE--OCTAL ASCIICALL DIGITS) 


.DSABL CRF 
END ;O0F FOR RO 
ADD #2,R0 
CHP RO, @USESTK-2 
BLE 8106 
El10G:ssssses 
ELSE 
BR L513 
LSL2:ssisas 


:IS EMPTY 


LSiS:ssssss 


MOV (SP)+-,.RO 


SEQ 0362 


—— 
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ROUTINE SUTINe BINAAY TO OCT TO OCTAL Ot ASC II) AND AND TYPE SEQ 0365 


mim i ‘ 


+ 


7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
37 
7 


ere Set Chee 


rere >? - 


+ 


Bebb pete pete bebe bebebe bepebe 


| ae? “ag S St HHH 


ESSESSEESESES SSE SESS SE 


>. 


a 4. & & 4 4. 4, 4, 4, 4, ee SF 


> +, 





-SBTTL ROUTINE BINARY TO OCTAL CASCII) AND TYPE 


ye ene oe ee 
s@THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 

1 sOCTAL CASCII) NUMBER AND TYPE 

308 i gee HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


NUM, -(SP) NUMBER TO BE TYPED | 
TYPOS +3CALL FOR TYPEOUT 
BYTE ON :3N*1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
BYTE 33Mel 0 


s3i*TYPE LEADING ZEROS 
te O=SUPPRESS LEADING ZEROS 


; @¢TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
ee Ne tee OR sTYPOC 


1% MOV NUM, -CSP) ssNUMBER TO GE TYPED 
= TYPON s;sCALL FOR TYPEOUT 


141 YPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 





—_- ee - 












ec 

:. :NUMBER TO BE TYPED 
7 SiCALL FOR TYPEOUT 
sTYPOS: 


054351 


pert ed sTyYPoc: 
054 
054350 sTYFON: 






SWITCH 

viet FOR 6) “DIGETS 
ron $ExC6) A OONT 
+ SAVE "S 
3 sSAVE R46 
3:SAVE RS 
3:GET THE NUMBER OF DIGITS TO TYPE 
33SUB T IT FOR MAX. ALLOMED 
use 


FILL SWITCH 







Ree 






18: 


+160 00 
28: | FORM THIS OIGIT 


Dg ne Beeld 





sRORRBRBARAREECRIAERRALEIIANE SEE a 


4s: 


ee 


cree MSV MACRO YOS.02 Monday 07-Oct-85 16:57 Page 425-1 
ROUTINE BI 


TAL OF ASeII) AND TYPE SEQ 0364 
13770 054272 052703 000060 BIS #°O.R3 ;:MAKE THIS DIGIT ASCII 
13771 054276 052703 9000040 S$: BIS @ RS ;:;MAKE ASCII IF NOT ALREADY 
137 7¢ pert oe 110337 054346 MOVB R3,83 73SA “" FOR TYPI 
1377 306 TYPE 8s 3:3G0 TYPE THIS DIGIT 
054306 104401 054346 TYPEIT ,8$ 
.DSABL CRF 
054350 6%: DECB sOCNT ;;COUNT BY 
BGT 2s ;;6R IF HORE TO OO 
BLT 7$ 3;8R IF 
INC R4 ;s INSURE LAST DIGIT ISN‘T A BLANK 
SR 2¢ 3:3G0 DO THE LAST DIGIT 
7$: MOV (SP)+,RS ; sRESTORE RS 
MOV (SP)+,R4 s sRESTORE R4 
MOV (SP)+«,R3 ; RESTORE R 
000002 000004 MOV 2(SP),4(CSP) 33SET THE STACK FOR RETURNING 
MOV (SP)+, (SP) 
RTI ; sRETURN 
8$: BYTE O ; STORAGE FOR eects DIGIT 
.BYTE O ;; TERMINATOR FOR TYPE ROUTINE 
$OCNT: .BYTE 0O ;;OCTAL DIGIT COUNTER 
$OFILL: .BYTE 0 ;;ZERO FILL SWITCH 
SOMODE: .WORD O ; ;NUMBER OF DIGITS TO TYPE 


i 
' 
' 
! 





——— o-—— — ow 


EE al 


A A TT TT | i me _—- -- 


SUING CBaY CHE WEMLeconal™SES TORE? ey o7-0ee-es 16:57 Page aze seo 034s 






























13791 .SBTTL ROUTINE CONVERT BINARY TO DECIMAL AND TYPE 
13792 ye gg yee oe on 
13793 ; THIS INE IS TO CHANGE A 16-BIT BINARY NUMBER TO A S-DIGIT 
13794 1 eSTGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
13795 IS POSITIVE OR A SPACE OR A MINUS SIGN WILL BE TYPED 
137% | SBEF ORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
13797 :@REPLACED WITH SPACES. 
13796 ;@CALL: 
13799 ;@ mov NUM, -( SP) ;;PUT THE BINARY NUMBER ON THE STACK 
13800 4 TYPOS :1GO TO THE ROUTINE 
13801 0543 $TYPDS: PUSH RO,R1,R2,R3.R5 
084 01 MOV RO, -(SP) 
034 010146 MOV R1,-(SP) 
01 MOV R2,-(SP) 
362 010 MOV R3, -(SP) 
364 010546 MOV RS, -(SP) 
13802 012746 020200 MOV 20200, -( SP) :3SET BLANK SWITCH AND SIGN 
1380 ; 2 016605 000020 MOV 20(SP).R5 :3GET THE INPUT NUMBER 
13004 7% 1 i$ :;8R IF INPUT IS POS. 
13805 RS ;3MAKE THE BINARY NUMBER POS 
i 112766 000055 000001 @’ -,10SP) ;:MAKE THE ASCII NUMBER 
13807 10 1%: 33;ZE TS 
13808 12 012703 054570 @+08LK R3 ; SETUP T POINTER 
1 16 112723 @ ,CR3)> I SET THE FIRST CHARACTER TO A BLANK 
13810 28: Ro” ;:CLEAR THE BCD NUMBER 
13811 016001 054560 $DTBL(RO),R1 ;3GET THE CONSTANT 
13812 1601 33: R1.R5 FORM THIS BCD DIGIT 
TTT 33 oos20s Re 13BR IF DONE BCD DIGIT BY 1 
33 
iseis osease poss or 
13816 060105 4s: R1.RS ;:ADD BACK THE CONSTANT 
13617 954442 005702 R2 +s CHECK IF BCD DIGIT=0 
13618 01002 S$ FALL THROUGH IF 0 
13819 105716 (SP) ESTILL DOING LEADING 0°S? 
1 100407 73 ::8R IF YES 
1 1 106316 5%: (SP) 3 3SD? 
i : 103003 6% ;;8R I 
13823 954456 116663 000001 177777 2¢SP),-2(R3) isVES--SET 1 SIGN 
1 702 000060 $ 0,R2 :3MAKE T HE BCD DIGIT ASCII 
13625 70 702 000040 7$ @ .R2 + MAKE ITA SPACE IF NOT ALREADY A DIGIT 
13826 74 11022 R2,(R3)> + :PU THIS CHARACTER IN THE OUTPUT BUFFER 
13827 76 0057 (RO)> rust INCREMENT ING 
i 7 000010 RO, @10 ;;CHECK THE TABLE INDEX 
i 46 28 ;:G0 DO THE NEXT DIGIT 
1 83 3:;G0 TO EXIT 
1385 10 010502 RS,R2 ;3GET 
1 12 000764 63 ;3G0 CHANGE TO ASCII 
1363 14 105726 8s: (SP). :;WAS THe LSD THE FIRST NON-ZERO? 
ert a 16 1000035 ot ;;6R IF 
138 116663 177777 177776 -1(SP),-2(R3) 3;;YES--SET THE SIGN FOR TYPING 
13836 105013 9%: cR3) ;SET THE TERMINATOR 
13837 R5.R3.R2.R1,RO 
054 012605 MOV (SP)+.R5 
054532 012603 MOV (SP)+,R3 
054534 012602 MOV (SP)+,R2 
054536 012601 MOV (SP)+,R1 
054540 012600 MOV (SP)+,RO 





————— ee 


o oe ee ee 


CVMJABO MSV11- 7 MEMORY 
ROUTINE CONVERT BINARY 


13838 054542 

054542 104401 
138639 054546 01 
138640 054554 012616 
13841 054556 000002 
Ere | 054560 023420 
1384 Omees 001750 
138644 564 000144 
13845 Ef s 3s 000012 
13846 054570 000000 

054576 000000 
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TO DECIMAL AND T 


054570 
000002 000004 


000000 000000 


sOTBL: 


sDBLK : 


sOBLK ;;NOW TYPE THE NUMBER 
—* 

2(SP),4¢(SP) ::;ADJUST THE STACK 
(SP )+, CSP) 


;;RETURN TO USER 


0,0,0,0 


SEQ 0366 
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ROUTINE TTY INPUT SEQ 0367 







13848 .SBTTL ROUTINE TTY INPUT 
13649 s SSSSSSHSSSSSSSSSESEASASSESSSESSSESSESESESSESAESESESESESESESEHSESESESESESESSESESESEESS 
13850 ;@SOFTWARE SWITCH REGISTER CHANGE ROUTI 
13851 ;@ROUTINE IS ENTERED FROM THE TRAP 
13852 ; eSERVICE THE TEST CHANGE IN SOFTWARE SWITCH WAEGISTER TRAP CALL 
13853 ; @WHEN RATING IN” TTY FLAG MODE. 
13855 054600 sCKSWR 
13856 054600 005737 047154 T XOCHAR ; SOMETHING THERE? 
13857 001406 BEQ NOCH :; GO ON IF NOT 
13858 054606 013746 047154 MOV XOCHAR, -(SP) :3 USE IT 
13859 054612 005037 047154 CLR 
13860 054616 000137 CONTS1 
13861 054622 105777 126014 NOCH: TSTB  @$TKS ;;CHAR THERE? 
13862 100136 BPL SWREND sa1F DON’ T WAIT AROUND 
13863 117746 126010 MOVB @$TKB, -(SP) ;;SAVE THE C 
13864 054634 042716 177600 Ic @tC177.(SP) :3STRIP-OFF THE ASCII 
13865 054640 022716 CONTS1: CMP (SP) ;1S IT CONTROL F? 
13866 054644 001002 NE , 
13867 054646 C04737 040762 CALL FIELOSERVICE 
13868 054652 022716 000024 i$ CMP 024,(SP) :IS IT CONTROL 1? 
13869 054656 002 ;NO - SK 
13870 054660 004737 055222 CALL CONTT YES - CALL CONTROL 1 ROUTINE 
13871 022716 000003 16%: CMP 63,(SP) :IS IT CONT 
1ee7e 70 001454 BEQ S$ sYES EXIT eeeeeNOTEesees STACK IS SCREWED UP! 
13873 054672 022716 000023 2%: CMP 023,(SP) :IS IT CONTROL S$? 
13874 054676 001002 BNE 173 ;NO - SK 
13875 054700 004737 055276 CALL CONTS ;YES - CALL CONTROL S ROUTINE 
13876 054704 022716 000013 17%: CMP #13,(SP) Pe IT CONTROL K? 
13877 054710 001005 BNE 6$ IP 
13878 054712 TYPE $CNTLK TYPE A tK 
054712 104401 055214 TYPEIT $CNTLK 
13879 054716 013706 002146 MOV CTLKVEC, SP ;RESET KSP TO AFTER PATTERN EXEC ROUTINE 
13880 054722 000207 RETURN ;RETURN TO PATTERN EXEC ROUTINE 
13881 054724 022737 000176 002636 6%: CMP @SWREG , SWR 3318S THE SOFT-SWR SELECTED? 
1 054732 001075 BNE CKEND ;:@BRANCH IF NO 
13883 054734 022716 000007 CMP 67, (SP) :31S IT A CONTROL G? 
13884 054740 001072 BNE CKEND ;3NO, RETURN TO USER 
138865 054742 005737 002062 TST $AUTO ;ARE WE RUNNING IN AUTO-MODE? 
13886 054746 001067 BNE CKEND BRANCH IF YES 
13887 054750 LG ;:ECHO THE CONTROL-G (tG) 
054750 104401 056020 TYPEIT $CNTLG 
13888 054754 SGTSWR: TYPE $MSWR ::TYPE CURRENT CONTENTS 
104401 056025 TYPEIT 2gitsur 
13889 054760 TYPOCT aSUWR ;;0F THE SUR 
760 017746 125652 V @SUR, -(SP) ;;SAVE @SWR FOR TYPEOUT 
054764 104402 TyeoC aa :3G0 TYPE--OCTAL ASCIICALL DIGITS) 
13890 054766 TYPE $MNEW ::PROMPT FOR NEW SWR 
054766 104401 056036 TYPEIT SHINE 
13891 054772 005046 3$: CLR -(SP) + CLEAR COUNTER 
13892 054774 ;THE NEW SWR 


005046 CLR -( SP) 
138693 054776 105777 125640 4$: TSTB asTKS ; CHAR THERE ? 


OOOO OE EE ES —-- << — o — 
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SOuTING TTY IN - SEQ 0368 

13894 055002 100375 as ;:IF NOT TRY AGAIN 
13895 05 117746 125634 @sTKB, -(SP) :3PI CHAR 
13896 055010 042716 177600 BIC @tC177,(SP) ;;MAKE IT 7-BIT ASCII 
13897 055014 021627 000003 (SP), 03 :31S IT A CONTROL - 

05 1006 $ ;;BRANCH IF NOT 
13899 055022 S$: YPE $CNTLC ;3YES, ECHO CONTROL-C (tC) 

055022 104401 056006 TYPELT  $CN 

0S 062706 000006 ADD 66,SP 1s CLEAN UP STACK 
13901 055032 000137 04044 JMP iT ;;CONTROL-C HALT 

5036 021627 000025 7%: CMP (SP), 025 ::1S IT A CONTROL-U? 

1390 3042 001005 BNE 9% ; +BRAWCH 
13904 05 TYPE $CNTLU :;YES, ECHO CONTROL-U (tu) 

055044 104401 056013 TYPELT agcNTLu 
13905 055050 062706 000006 8s: ADD 06, SP ; IGNORE PREVIOUS INPUT 
13906 000746 BR Bs :3LET'S TRY IT AGAIN 
13907 021627 000015 9%: CMP (SP),015 :31S IT A <CR>? 
13908 05 001024 133 ;;BRANCH IF NO 
3909 05 766 000004 TST a(sP) ;:YES, IS IT THE FIRST CHAR? 
13910 70 001403 BEQ 0% ;;@RANCH IF YES 
13911 055072 016677 000002 125536 MOV 2(SP), @SWR ;:SAVE NEW SWR 
13912 055100 10$: IF SWRFLG IS TRUE 

e35i04 100 005737 002566 TST SWRFLG 

001403 BEQ L514 

t o3sits 062706 000006 ADD 6,SP ;:CLEAR UP STACK 

1 3ota 3112 ELSE 
000402 BR L515 

Ossita L514:sssse3 
13915 055114 062706 000010 ADD #10,SP ;;CLEAR UP STACK 
13916 055120 END 

L515:ssssse 

13917 055120 TYPE $CRLF ;;ECHO <CR> AND <«LF> 

055120 104401 002660 TYPELT agCRLF 
13918 055124 000002 SWREND: RTI ; sRETURN 


ROUTINE 


CVMJABO os ae i 


13919 055126 


13936 055212 
13937 055214 
055217 


13938 
13939 


MEMORY 


NPUT 


000002 
177776 
002657 


113 
000 


015 


CKEND : 
13%: 


148: 


158: 


SCNTLK: 


CALL 


-ASCIZ 


. EVEN 
. DSABL 


ue 
Vv“ 
5 
Zw 
~ 
w 
v 
— 


8$ 
/*K/<15><12> 


LSB 


Page 427-2 


sFIX STACK 
;RE 


YES 
scitI 


FA 
HIS 7; FIRST CHAR 


;;SIMULATE CONTROL -U 
;CONTROL K ASCII STRING 


SEQ 0369 
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ROUTINE TTY INPUT SEQ 0370 
13942 055222 CONTT: SUBTST <<CONTROL T>> 
t SESAASAASASSSESHEARSESSSEESAASSSSSSSESESESSSESESESESEESEEEEEHESESESEEEED 26£6466446646666666 
3; *SUBTEST CONTROL T 
; SESASSAAAAASSESSSSESAASSESESSSEAASESSEESSESEESEEEEEEEEEEEEESEEEEEEEEEEESEEEEEEEEEEEEEEESD 
13943 055222 PUSH RO 
22 010046 MOV RO, -CSP) 
13944 055224 TYPE sCRLF 
05 104401 002660 TYPEIT ,$CRLF 
.DSABL CRF 
13954 055250 IF RLFLAG IS TRUE 
055230 005737 002126 TST RLFLAG 
055234 001402 BE@ L516 
13955 Osaste TYPE MSGO92 sRELOCATED 
0s 104401 070474 ys Y »™SGO92 
13956 Oeeses END ;OF IF RLFLAG 
05 L516: ssss33% 
13957 eases TYPE M™SGO93 ;BANK= 
$242 104401 070510 TYPEIT MSGO93 
.DSABL CRF 
13958 055246 yPocs BANK sTYPE 3 OIGITS 
055246 013746 002102 MOV BANK, -( SP) ate | BANK FOR TYPEOUT 
055252 104403 TYPOS 3:GO TYPE--OCTAL ASCII 
055254 .BYTE 3 3;;TYPE 3 DIGITCS) 
055255 goal: 0 ;; SUPPRESS LEADING ZEROS 
13959 055256 TYPE M™SGO9S ;PAT= 
055256 104401 070516 yen »4SGO95 
13960 055262 TyPocs REALPAT, REALPA 2 DIGITS 
055262 013746 002300 REALPAT, -CSP) “TTSAVE, per a “a TYPEOUT 
055266 104403 T Ss ;;GO0 T AL ASCII 
055270 002 .BYTE 2 5 OYE “y orertce) 
055271 BYTE 0 ;:; SUPPRESS LEADING ZEROS 
DSABL CRF 
13964 055272 
055272 012600 MOV (SP)+,.RO 
gto 055274 000207 RETURN 


CVMJABO MSV11-J MEMORY 
CONTROL S & CONTROL @ 


13967 055276 


13968 055276 
76 


DIAG. 


CONTS: SUBTST 
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<<CONTROL S € CONTROL Q@>> 


3 a 


CONTROL S € CONTROL Q@ 


seaaedbnnnnccnebennnatencnssasaunnonnesannaseqeoonongnoeeennoooosonesanonoceses 
POP RO F 


CONTS2: TSTB 
BPL 


BIC 

IF (SP) 
JMP 

ELSE 


BR CONTS2 
END ;OF IF (SP) 


;GET RID OF RETURN ADDRESS 
;WAIT FOR CHARACTER 
ee OVER yee ON STACK 


;STRIP ALL BUT A 
;IF IT IS A CONTROL Q 


TACK 
MOV (SP)+,RO 


CMP (SP),@21 
BNE L517 


BR LS20 
LS17:ssssss 


LS20:sisiscs 


SEQ 03571 


ee a t— 


_—-——— ——_ 
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CONTROL S$ E 2 CONTROL Q SEQ 0372 
13979 SSS att... 
13980 seTHIS: ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
3% : 
13982 30 ROCHR ;:INPUT A SINGLE CHARACTER FROM THE TTY 
1398 6 RETURN HERE ; CHARACTER IS ON THE ST 
13984 :4 ;;WITH PARITY BIT STRIPPED OFF 
eter : 
is $RDCHR: MOV (SP), -CSP) 3:;PUSH DOWN THE PC 
13968 000002 MOV 4(SP),2CSP) :;SAVE THE PS 
i 989 1s: TSTB a@sTKS :;WAIT FOR 
13 BPL i$ :3A CHARACTER 
13991 000004 MOVB #@$TKB,4(SP) s1READ THE TTY 
13 000004 BIC @tC<177>,4(SP) 3;;GET RID OF JUNK IF ANY 
1399 000023 CMP 4(SP), 023 :31S IT A CONTROL -S? 
13994 BNE a :38R IF NO 
13995 2%: TSTB @$TKS ;;WAIT FOR A 
13 BPL 28 ;;LO0P UNTIL ITS THERE 
1399 MOVB @sTKB, -CSP) ; ;GET ACTER 
13998 BIC @tC177,(SP) ;;MAKE IT 7-BIT ASCII 
13999 CMP (SP)+, 21 3318S IT A ROL - 
14000 BNE 23 :3IF NOT DISCARD IT 
14001 BR i$ 33;YES, RESUME 
14008 000021 3%: CMP 4(SP),@21 1312S IT A RANDOM CONTROL -Q? ;R-C 
1400 BEQ ;:@RANCH BACK IF SO :R-C 
14004 000140 CHP 4(SP),@140 331S IT UPPER CASE? 
14005 BLT ;;@RANCH IF YE 
14006 000175 CMP 4(SP),0175 :31S IT A SPECIAL CHAR? 
1400 BGT ::@8RANCH IF YE 
14008 05 000004 BIC 040,4(SP) ;3;MAKE IT CA 
14009 055462 4$: RTI ::G0 BACK TO a 
14010 3 266666466 668666 6646668066 6626666666666 6866688668646 64686688466668666666846646666464646666 
14011 ;@THIS ROUTINE WILL INPUT A STRING FROM THE TTY 
Peds | ;*CALL: 
1401 ;¢ ROLIN ::INPUT A STRING FROM THE T 
14014 a RETURN HERE ;sADDRESS OF FIRST CHARACTER "uTLL BE ON THE STACK 
14015 3% ;; TERMINATOR WILL BE A BYTE OF ALL O'S 
14016 055464 010346 $ROLIN: MOV R3,-(SP) 335A 
1401 95 CLR a ;CLEAR THE RUBOUT KEY 
14018 70 012703 055762 1s: MOV OSTTYIN,R3 T ADORESS 
14019 74 022703 056006 2$: CMP @STTYINe20.,.R3 ;;GUFFER FULL? 
14020 5 101477 BLOS 8% :38R IF 
14021 104411 ROCHR +:G0 READ ONE CHARACTER FROM THE TTY 
1s0ee ; 11261 MOVB CSP)+,CR3) 33 T 
14088 122713 000003 CMPBtiéd#S CXS) 3318 IT A CONTROL-C? 
1 5512 001016 BNE $ ; BRANCH IF NO 
14025 055514 TYPE $CNTLC 33TYPE A CONTROL-C (tC) 
055514 104401 056006 TYPELT asenTLc 
14026 0S 005726 TST )e ;:CLEAN RUBOUT KEY OFF OF THE STACK 
14027 055$22 012603 MOV (SP)+,R3 ; RESTORE R3 
1 05 032777 000400 125104 BIT eB1TS. @SUR 331S THERE A HALT FLAG SET IN THE SWR? 
1 osS 001404 Q 11% BRANCH IF NOT TO HALT ROUTINE 
14030 055534 005037 002420 CLR ST :;GET READY TO HAL 
14031 055540 000137 040512 JMP EXIT :3G0 HALT 
14032 055544 000137 11: JMP QUIT : :G0TO CONTROL -C HALT 
14033 055550 122713 000177 33: CMPB0s«@#1777, (XB) 5;1S IT A RUBOUT 


ce LLL LL LLL LLL 


——— 
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14034 055554 001022 BNE S$ ::8R IF NO 
14035 055556 005716 TST (SP) +31S THIS THE FIRST RUBOUT? 
4036 6 055560 001007 BNE a§ ;38R IF 
14037 055562 112737 000134 055760 MOVB #'\,108 ;3TYPE A BACK SLASH 
14038 055570 TYPE 108 
055370 104401 055760 TYPEIT 108 
.DSABL CRF 
14039 055574 012716 177777 MOV @-1,(SP) ;3;SET THE RUBOUT KEY 
14040 05 303 4s: 3 ;:BACKUP BY 
14041 05 020527 055762 R3,esTTYIN :aSTACK EMPTY? 
14048 1034 84 ;3BR IF YES 
1404 10 111337 055760 (R3),10% ;SETUP TO TYPEOQUT THE DELETED CHAR. 
14044 14 108 +360 TYPE 
14 104401 055760 2108 
14045 055620 000725 es ::GO READ ANOTHER CHAR. 
14046 005716 S$: (SP) ;:RUBOUT KEY SET? 
1404 001406 6$ ;;6R IF NO 
14048 112737 000134 055760 @ \,108 ::TYPE A BACK SLASH 
14049 10$ 
055634 104401 055760 2108 
i 955640 005016 (SP) ;;CLEAR THE RUBOUT KEY 
14051 122713 000025 63: 625, (R3) >31S CHARACTER A CIRL U? 
1 053646 001003 73 :38R IF 
i 055650 $CNTLU ;;TYPE A CONTROL “U“ 
055650 104401 056013 2SCnTLU 
1 95 $4 000705 i$ ;:GO0 START OVER 
1 122713 000022 7$: $22,(R3) 3318 CHARACTER A “tR“? 
1 001011 9% ; ;BRANCH 
i 7 05015 CR3) ;;CLEAR THE eee 
i sCRLF 3 TYPE A “CR® € 
05 104401 002660 zACRer 
14059 035672 $TTYIN ::TYPE THE INPUT STRING 
5672 104401 055762 aSTTVIN 
14060 055676 000676 2% ::G0 PICKUP ANOTHER CHACTER 
14061 055700 8: $QUES ;3;TYPE A 
700 104401 002657 , $QUES 
14062 704 000671 is ;:;CLEAR THE BUFFER AND LOOP 
1406 706 111337 055760 9$: (R3),10% ;;ECHO THE CHARACTER 
14064 055712 108 
12 104401 055760 2108 
14065 055716 122723 000015 615,(R3)> ;:CHECK FOR RETURN 
14066 5722 001264 ;:LO0P IF NOT RETURN 
14067 055724 105063 177777 -1(R3) ;3CLEAR RETURN (THE 15) 
14068 0557 sLF ;:TYPE A LINE FEED 
104401 002661 .SLF 
14069 $734 005726 (SP) ; ;CLEAN RUBOUT KEY FROM THE STACK 
4070 7 012603 (SP)+,R3 ; sREST 
14071 055740 011646 (SP), -(SP) ; ADJUST We STACK AND PUT ADORESS OF THE 
14072 055742 016666 000004 000002 4(SP),2¢SP) 33 FIRST ASCII CHARACTER ON IT 





om coe ee - 


LLB LALLA, LL LE OL | ELL LLL LL LS SS: De OO ee a. aS... aaQ42:2:.0 EES 
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Het Se J MEMORY DIAG. 
CONTROL ONTROL @ 


SEQ 03574 


14073 055750 012766 055762 000004 MOV @sTTYIN, 4(SP) 
14074 5756 000002 RTI ; sRETURN 
14075 760 000 108: .BYTE 0 s:STORAGE FOR ASCII CHAR. TO TYPE 
14076 Ls 000 .BYTE 0 33 
14077 0557 nema STTYIN: .REPT 20. ; sRESERVE SIZE BYTES FOR TTY INPUT 
; : i 015 sCNTLC: .ASCIZ /tC/<15><12> ;:;CONTROL "C” 
| 14061 i$ 3 125 015 ‘$sCNTLU: .ASCIZ /tU/<15><12> ;:;CONTROL “U” 
| 14062 ‘ 107 015 *sCNTLG: .ASCIZ /tG/<15><12> ;:CONTROL “G” 
| 14063 01 012 123 $MSWR: .ASCIZ <15><12>/SWR = 
127 122 
33 975 040 000 
140864 36 040 16 ‘SMNEW: .ASCIZ / NEW = / 
i 105 127 040 
056044 075 000 
14065 .EVEN 


2 e—Oeeeeee ee 





14087 
148g 
1 
14090 
14091 
1 098 
14094 
14095 
1409 
HS sats 
14101 Of +¢ 
Sooty 
14102 056¢ 6 
eeore 
tio? o86102 
4108 056104 
4 ast 
4112 ¢ 
5 east 
yssiae 
44 
56146 
561 
i 
assi60 
Sies 
5617 
i? 
174 
14130 056176 
14131 


14132 oneeos 


MOR Y 


DIAG 


NUMBER FROM 


056176 


177770 


070046 


070066 
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HE TTY 


.SBTTL ROUTINE READ AN OCTAL NUMBER FROM THE T 
' seccnssisnsnsessusencsacnceasnsnsensaeusencnanacssnansacesenacacasscassssaanes 



























3@THIS ROUTINE WILL READ AN OCTAL CASCII) R FROM THE TT 
| SCHANGE IT TO BINARY. 
*eTHE INPUT ACTERS WILL BE CHECKED. TO INSURED THEY ARE LEGAL 
:s0CTAL 2 LP IF AN ILLE ad te Is a A "2?" WILL TYPED 
FOLLOWED BY A CARRIAGE RETURN. L FEED. COMPLET T 
1eTHEN BE RETYPED. THE INPUT IS TERMINATED oy TYPING A CARRIAGE RETURN. 
3% : 
3% T 
3 RETURN HERE 
3% 
$RDOCT: MOV (SP),-CSP) 
MOV 4(SP),2(SP) 
PUSH RO,.R1,R2 
18%: 
CSP )+,RO 
RO,5$% 
Ri 
Re 
2s: alata 
@'0O,CSP) 
4&3 
@'7,CSP) 
4&y 
Ri 3342 
R2 
Ri 3324 
Re 
a 3348 
#tC7.CSP) :3;STRIP THE ASCII JUNK 
tae i IN THIS DIGIT 
3$: CSP )-« + OE EAN TERMINATOR FROM STACK 
R1.12¢SP) 3;SAVE THE RESULT 
R2, SHIOCT 
R2,R1.RO 
MOV (SP) ,R2 
MOV (SP)+,R1 
MOV CSP)+.RO 
4$: (SP )-+ 
CRO) 
CRF 
S$: 0 
MSGO62 ; INPUT MUST BE A 
MSG062 
CRF 
™SGO063 3N OCTAL 
»MSGO063 





SEQ 0375 


—— oe —— << - 


ences t-te rata cil ttt LL LLL | AO ALLL LLL LLL AL ALA LLL LLL LLL LLL LLL LLL 


EOS Oak CEE" DASE eeakRS FARO? ence o7-008-05 16157 Page asia sea os 










14133 10 T MSG064 NUMBER 
956315 104401 070077 Terr smscoea . 
000724 BR is 33TRY AGAIN 
000000 $HIOCT: .WORD 0 HIGH ORDER BITS GO HERE 
"SBTTL ROUTINE READ A DECIMAL NUMBER FROM THE TTY 





3 ANY CHARACTERS 
Ore BY A_CARR -LINE BE TYPED. 
s@ Te MUST BE . THE INPUT IS BY THE 

1 USER ING A TAGE RETURN. THE RANGE OF THE INPUT NUMBER IS 
ory IVE 32768. 

: 





ROOEC ssREAD A DEC 


:é IMAL NUMBER 
RETURN HERE ;;NUMBER IS ON TOP OF THE STACK 


$RODEC : SP), -CSP) :sPROVIDE SPACE FOR 
NUMBER 


2(SP) 33THE INPUT 


is: 


2%: 


_ CSP) 


»- CSP) 


sero BERSE ao 
ao 

“~e Nel Ned Ned Noa Mat 

¢2 

ed 





4s: 





SERESSSEESEPREPRSEGEGEUERGOOUE? 722 


Rgetk 
+ he 

7 

me 

ee 

J 


CVMJABO MSV11-J MEMORY 
ROUTINE READ A DECIMAL 


14189 056366 
14190 056370 
056370 
14191 0563574 
056374 
14192 056400 
056400 


14193 056404 


012602 


012601 — 
012600 


000002 


104401 


104401 
000714 


DIAG. MACRO 
NUMBER FROM THE TTY 


070046 


070107 


070077 


-_ 


—_— —_—-—-— 
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S$: 


6$: 


; sRETURN 


;;CLEAN PARTIAL NUMBER FROM STACK 
;;SET A_TERMINATOR 
;;TYPE THE INPUT UP TO BAD CHAR. 


;;POINTER GOES HERE 
; INPUT MUSST BE A 


;DECIMAL 
; NUMBER 


3; TRY AGAIN 


SE9 0377 


eee CL LLL LT 


re ee —™ 
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ROUTINE SAVE AND RESTORE RO-RS SEQ 0378 
10399 .SBTTL ROUTINE SAVE AND RESTORE RO-RS 
14197 | POREESSEEESEESSSSEEEEESEEESESEESEEESEESEEEEEEREEEESEEEDAAEESEEESESEEESEEDESEEEEDE 
14196 ;*SAVE RO- 
14199 ;*CALL: 
14200 ;* SAVREG 
py od ;@UPON RETURN FROM $SAVREG THE STACK WILL LOOK LIKE: 
;% 
13308 ;*TOP---( +16) 
14204 3@ #2---(€ +18) 
14205 3@ +4---RS 
14206 3@ +6---R4 
14207 3@ «8---R3 
14208 3#*10---R2 
14209 3#e12---R1 
14210 3#°14---RO 
14211 
14212 056406 $SAVREG: 
14213 056406 PUSH RO,R1,R2,R3,R4,RS 
056406 Cl MOV RO, -CSP) 
056410 010146 MOV R1,-CSP) 
056412 010246 MOV R2,.-CSP) 
14 010346 MOV R3,-CSP) 
16 010446 MOV R4,-CSP) 
056420 010546 MOV RS,-CSP) 
14214 2 016646 000022 MOV 22(SP).-CSP) ;;SAVE PS OF MAIN FLOW 
14215 <s 016646 000022 MOV 22(SP),-CSP) ;:;SAVE PC OF MAIN FLOW 
14216 0564 016646 000022 MOV 22(SP),-(SP) ;:;SAVE PS OF CALL 
14217 056436 016646 MO 22(SP),-CSP) ;:;SAVE PC OF CALL 
4s 2 RTI 
1 ;*#RESTORE RO-RS 
1 1 ;*CALL: 
1seee 34 RESREG 
1422 $RESREG: 
1 012666 000022 MOV (SP)+,22(SP) ; ;RESTORE PC OF CALL 
1 SO 012666 000022 MOV (SP)+,22CSP) ; ;RESTORE PS OF CALL 
14226 54 012666 000022 MOV (SP)+,22CSP) ; RESTORE PC OF MAIN FLOW 
14227 012666 000022 MOV (SP)+,22¢0SP) ; RESTORE PS OF MAIN FLOW 
14228 POP R5,.R4,R3,R2.R1, 
012605 MOV (SP)+.R5 
012604 MOV (SP)+,R4 
056470 012603 MOV (SP)+,R3 
056472 012602 MOV (SP)+-,R2 
056474 012601 MOV 8 St 


oieaee 012600 MOV 
14229 500 000002 RTI 
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CvMJ 
ROUTINE RANDCM R GENERATOR SEQ 0379 


eit: .SBTTL ROUTINE RANDOM NUMBER GENERATOR 
14233 j ORSSEEEEESESESESESESSESESEEESSESESESEESESESESESEDESEEESSSSESSEDESESEEESESEESESS 
14234 ;@THIS ROUTINE IS A DOUBLE PRECISION PSEUDO RANDOM NUMBER GENERATOR 
14235 ;@WITH A RANGE OF O TO 2ee(+33)-1i. 
142 ;*CALL: 
142357 73 CALL $RAND ;;CALL THE ROUTINE 
14238 3; RETURN ; ;sRETURN HERE THE RANDOM 
14239 ;* ; ;NUMBER WILL BE IN 
erty 3% 33 SHINUM, $L 
14242 056502 $RAND: PUSH RO,R1,R2 
056 010046 MOV RO, -(SP) 
056 010146 MOV R1,-CSP) 
one 010246 MOV R2, -(SP) 
14243 510 13700 002604 MOV SEEDLO,RO ;SET RO WITH LOW 
14244 1 013701 002602 MOV SEEDHI ,R1 ;SET R1 WITH HIGH 
14245 12702 7 MOV 67 ,R2 ;SET FT COUNT 
14246 300 1%: ASL 0 ;;SHIFT RO LEFT AND 
14247 056 101 ROL Ri ; ;ROTATE CARRY INTO R1 AND 
14248 0565 077203 soB R2,1% 
14249 056532 3700 002604 ADD SEEDLO,RO ;ADD NUMBER TO MAKE X 129 
14250 36 501 Ri ; sPROPOGATE CARRY 
14251 540 063701 002602 ADD SEEDHI ,R1 ; NUMBER TO MAKE X 129 
14252 700 001057 ADD 21057,RO ;;ADD LOW CONST 
14253 056550 501 ADC Ri ; sPROPOGATE CARRY 
Ones 701 047401 ADO €47401,R1 ;;ADD HIGH CONSTANT 
14255 556 0037 002604 MOV RO, SEEDLO ;SAVE RO 
010137 002602 MOV Ri, SEEDHI ;SAVE R1 
14257 056 POP R2,.R1,RO 
012602 MOV (SP)+,R2 
056570 012601 MOV (SP)+,R1 
056572 012600 MOV (SP)+,.RO 
14258 056574 000207 RETURN 
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ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT 


;*UNSI 


;* MOV 
;* CALL 


000002 
056715 MOV 
000014 
177770 MOV 


i$: MOVB 


Wt 
ws 
RP 
$ 





3* RETURN 


SAVREG 
V 


SOCTVL: .REPT 
$OCT8=SOCTVL +4 


@PNTR, -CSP) 
$0820 


2(SP),R1 
7 an 


I mmm 
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F = SEQ 0380 


.SBTTL ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT 
j Qosacsesssancccesscsscooasssscsssnssossccosonscossconsoasscessconsccesscenseecs 
;*#THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN 
GNED OCTAL ASCIZ NUMBER. 


+ Eee LOW WORD OF BINARY NUMBER 
TL SS OF THE FIRST ASCIZ CHAR. IS ON THE STACK 


“< ALL REGISTERS 

PICKUP THE POINTER TO LOW WORD 
POINTER TO DATA TABLE 
ELEVEN CHARACTERS 


DIGIT 
-ADJUST POINTER FOR FIRST 
CHAR. &€ PUT IT ON THE STACK 
RESTORE ALL REGISTERS 
;RETURN TO USER 
;;POSITION THE MASK FOR THE LAST DIGIT 
;:;POSITION THE BINARY NUMBER FOR 
$3 THE NEXT OCTAL DIGIT 


CHAR. ASCII 
PUT IT IN THE DATA TABLE 
VE DATA TABLE 
;POINTER TO 11 DIGIT NUMBER 


CVMJABO MSV11-J 
TABL 


9 
14320 056737 


056740 
14323 056742 
056744 


056746 
ete | 056747 


14356 057002 


MEMORY DIAG. 


a 2 HE 


33 


177776 


Hf Uilleslasle 


MACRO YOS.02 Monday 07-Oct-85 16:57 Page 456 






SBTTL TABLES 
— SBTTL APT MAILBOX-ETABLE 
$MSGTY: .WORD 0 1 MESSAGE TYPE CODE 
$FATAL: .WORD 0 ;3FATAL ERROR NUMBER (ERROR PC) 
$TESTN: .WORD 0 :3TEST PATTERN NUMBER 
$PASS: .WORD 0 ;:PASS COUNT 
$DEVCT: .WORD 0 ;:DEVICE COUNT 
$UNIT: .WORD 0 :31/0 UNIT NUMBER 
° : :WORD 0 ; sMESSAGE 
$MSGLG: .WORD 0 ; MESSAGE LENGTH 
SE TABLE :;APT ENV 
$ENV:  .BYTE 0 ; ENVIRONMENT BYT T TO A 1 FOR APT AUTO MODE 
;NOTE: iF BIT #7 IS SET in’? SENVM THE T EBEG INNING AT $MAMS1 AND 
; ENDING AT $MADR4) MUST BE FILLED IN 0" INDICA1E THE PROPER AMOUNT OF 
; EACH TYPE OF ME 
SENVM: .BYTE 0 OENVI RONMENT MODE 
1BIT7( 200 )=USE APT SIZE INFO ;BITS(40)=NO CONSOLE 
$SWREG: .WORD 101 T SWITCH REGISTER 
SUSWR: .WORD 0 CED TO LIMIT THE NUMBER OF PASSES 
$CPUOP: .WORD 0 ;3CPU TYPE, OPTIONS 
;% BITS 15-11°CPU TYPE 
a 11/04=01, 11/0502. 11/20=03, 11/40=04, 11/45=05 
;8 11/ 79906, PDQ=07 ,Q=10 
34 BIT 10=REAL T 
o BIT 9=FLOATING POINT PROCESSOR 
34 BIT 8=MEMORY 
$ BYTE 1 ;;HIGH ADDRESS.M.S. BYTE ;DEFAULT = 64K 
$MTYP1: .BYTE 4 ;3MEM. TY 
a MEM. TYPE BYTE -- CHIGH BYTE) 
3% =001 
3% 
;* 
an ERROR RECTING MOS=004 
$MADR1: .WORD 177776 ;;HIGH ADDRESS 
i nana mEM . LAST ADDR. “3 ‘BYTES. THIS WORD AND LOW OF “TYPE” ABOVE 
3 ;sHI 
$MTYP2: .BYTE 0 sn TYPE Kee’ 
$MADR2: 0 ;;MEM.LAST ADDRESS.BL 
$MAMSS: .BYTE 0 ; HIGH : 
$MTYP3: .BYTE 0 3 :MEM. TYPE .BLK@S 
$MADRS: 0 ;:MEM.LAST ADDRE 
$MAMS4: .BYTE 0 ;;HIGH ADDRESS,M.S 
$MTYP4: .BYTE 0 ; MEM, TYPE, BLK 
$MADR4: .WORD 0 ;;MEM.LAST ADORESS.BLKe4 
$VECTi: .WORD 0 ;;INTERRUPT VECTORG1,8US PRIORITYS1 
VECT2: .WORD 0 : INTERRUPT VECTOR@2BUS PRIORITYO2 
8 ; .WORD O ;:BASE ADDRESS OF EQUIPMENT UNDER TEST 
$DEVM: .WORD 0 ; DEVICE MAP 
$CDOWi: .WORD 0 
$CDW2: .WORD 0 
$DDW7: .WORD 0 ;UFD MODE FLAG 1=UFD MODE 


SEQ 0381 


—— ee ee eee 
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177777 


1 
14385 057030 
14386 057032 
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SEQ 03862 


; THE A te LOCATIONS SPECIFY WHICH PATTERNS 


: 
$DDWO: .WORD 
$00Wi: .WORD 
$00W2: .WORD 
$D0WS: .WORD 
$D0W4: .WORD 
$O0WS: 
SE TEND: 
;SETUP AP 
INTERFACE SPEC. 
SAPTHD: 
$HIBTS: .WORD 
$¢MBADR: .WORD 
$TSTM: .WORD 
$PASTM: .WORD 
$UNITM: .WORD 
. WORD 


RUN FOR PARTICULAR MEMORIES 


nce THE TABLE LISTED BELOW TO RELATE BITS TO PATTERNS. 
‘BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE, BITO SET 
sIN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE 


;NOTEss NULL TESTS DO NOT TAKE ANY TIME 


177777 


sECC CSR TESTS 


sFIELO SERVICE VALUE 
177777 


177777 =6;ECC oe TESTS TABLE = MKCSRT 
177777 ECC PATTERNS 103777 TABLE = MKPAT: 
177777 =;ECC PATT RNS 177777 TABLE = MKPAT: 
177777 ;PARITY PATTERNS 003777 TABLE = MJPAT 
177777 ;PARITY PATTERNS 177774 TABLE = MJPAT 


APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 


0 
$MAIL 
35 


700. 
$ETEND-$MAIL/2 


;;TWO HIGH BITS OF 16 BIT so ADOR 
;;ADDRESS OF APT MAILBOX (BITS 0-15) 
TIM OF LONGEST TE 


ST PASS ON 128K (QUICK VERIFY) 
RUN TIME FOR EACH ADDITIONAL 128K (QV) 
; }LENGTH MAILBOX - P TABLE CHORDS S) 


CVMJABO MSV11-J 


J MEMORY 


ROUTINE TRAP DECODER 


14410 
14411 057070 
057070 


14412 057074 


DIAG. 


057076 


065557 
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-SBTTL ROUTINE TRAP DECODER 


;*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF 
;#AND USE IT TO INDEX THROUGH THE TRAP TABLE F START 

;#0F THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
:#G0 TO THAT ROUTINE. 


STRAP: MOV RO, -CSP) 3 sSAVE 
MOV 2(SP),RO 3:3GET TRAP ADDRESS 
TST -CRO) ; sBACK Y2 
MOV8 CRO),RO 3:GET RIGHT BYTE OF TRAP 
ASL 5 SCORE aan FOR INDEXING 
MOV $TRi ADCRO),RO 3:INDEX TO TABLE 
RTS RO 3:;G0 TO ROUTINE 


:sTHIS IS USE TO HANDLE THE “GETPRI” MACRO 


$TRAP2: MOV (SP), -CSP) ;:MOVE THE PC DOWN 
MOV 4(SP),2CSP) ;;MOVE THE PSW DOWN 
RTI ;:;RESTORE THE PSW 
$NOTRAP : TYPE MSGO06 ; UNDEFINED TRAP INSTRUCTION 
TYPEIT ,MSGOO6 
.DOSABL CRF 
$HALT2: HALT 


SEQ 0385 


er 


— 2 
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TRAP TABLE SEQ 0384 
14415 _SBTTL TRAP TABLE 
14417 ,eTHIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
14418 1eBY THE “TRAP” INSTRUCTION. 
14419 
| 144 ; ROUTINE 
1aaze 057076 057056 $TRPAD: . sTRAP2 | 
14423 057100 047030 {TYPE sCALL*TYPEIT —TRAP+1(104401) TTY TYPEQUT. ROUTINE | 
14424 057102 054152 sTYPOC ;CALL=TYPOC AP:2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) | 
14425 057104 054126 $TYPOS ;CALL=TYPOS TRAP .3¢ 104408) TYPE OCTAL NUMBER (NO LEADING ZEROS) | 
14426 057106 057070 $NOTRAP; $TYPON ;CALL=TYPON TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL 
14427 057110 054354 $TYPDS | ;CALL=TYPOS TRAP+5( 104405) TYPE DECIMAL NUMBER (WITH SIGN) 
, 057112 057070 SNOTRAP; $TYPBN ;CALL*TYPBN TRAP>6( 104406) TYPE BINARY (ASCII) NUMBER 
14450 057114 054754 $GTSWR ;CALL=GTSWR TRAP+7(104407) GET SOFT-SWR SETTING 
14431 057116 054600 $CKSWR ;CALL*CKSUR TRAP+10(104410) TEST FOR CHANGE IN SOFT-SUR 
14433 057120 055334 $RDCHR ;CALL=RDCHR TRAP+11(104411) TTY TYPEIN CHARACTER ROUTINE 
14434 057122 (55464 $RDLIN ;CALL*RDLIN TRAP+12(104412) TTY TYPEIN STRING ROUT 
14435 057124 056050 $RDOCT ;CALL=ROOCT TRAP+13(104413) READ AN OCTAL NUMBER FROM TTY 
14436 057126 056220 $RODEC ;CALL*RDDEC TRAP+14(104414) READ A DECIMAL NUMBER FROM TTY 
14438 057130 056406 $SAVREG ;CALL*SAVREG | TRAP+15(104415) SAVE RO-RS ROUTINE | 
14439 os7132 056444 $RESREG ;CALL*RESREG #§ TRAP+16(104406) RESTORE RO-RS ROUTINE 
14441 057134 034070 SKERNEL ;CALL*KERNEL TRAP+17(104417) ENTER KERNEL MODE 
14442 057136 034100 SENERGIZE s CALL =ENERGIZETRAP+20( 104420) TURN ON MEMORY MANAGEMENT & TRAPS 
14443 057140 034110 SDEENERGI CALL =DEENERGITRAP+21( 104421) TURN OFF MEMORY MENAGEMENT & TRAPS 
14445 057142 036202 $KMAP —s-_ ; CALL = KMAP TRAP +22(104422) MAP KERNEL 1 TO 1 
14447 057144 034120 SCACHN ;CALL=CACHON  TRAP+23(104423) TURN CACHE ON 
14448 057146 034144 SCACHF .CALL=CACHOFF TRAP+24(104424) TURN CACHE OFF 
14450 057150 034162 $LOADC ;CALL*LOADCSR TRAP+25(10442S5) LOAD CORRECT CSR 
034256 $READC ,CALL®READCSR TRAP+26(104426) READ CORRECT CSR 


14451 057152 
aa 






TRAP +27( 104427) 
TRAP +30( 104450) 


PROGRAM DETECTED 
PROGRAM DETECTED 
PROGRAM DETECTED 
PROGRAM DETECTED 


047364 $PERO1 ;CALL=PERROL 
PERO2 RRO2 








047470 SPERO4 ;CALL TR 1044 
¢ 7 CALL TRAP + 33( 104433) , 
047574 $PER1O ;CALL*PERR10 TRAP +34( 104434) PROGRAM DETECTED ERROR 
047624 $PER11 ;CALL=PERR11 TRAP +35( 104435) PROGRAM DETECTED ERROR 
047644 $PER12 ;CALL=PERRI2 TRAP +36( 104436) PROGRAM CTED 
047666 $PER13 ;CALL=PERRiS TRAP +37( 104437) AM DETECTED ERROR 
047706 $PER14 ;CALL*PERR14 TRAP +40( 104440) PROGRAM DETECTED ERROR 
047730 $PER1S ;CALL=PERRIS TRAP +41(104441) PROGRAM DETECTED ERROR 
0477 ;CALL =PERR16 TRAP +42( 104442) PROGRAM TED ERROR 
047772 $PER17 ;CALL=PERR17 TRAP +43( 104443) PROGRAM DETECTED ERROR 
050010 sCALL= 20 TRAP +44( 104444) PROGRAM TED ERROR 
$PER21 ;CALL=PERR21 TRAP +45( 104445) PROGRAM DETECTED 
050046 $PER22 ;CALL=PERR22 TRAP +4601 PROGRAM DETECTED 
$PER23 ;CALL=PERR25 TRAP +47( 104447) PROGR TED 
050102 $PER24 ;CALL=PERR24 TRAP + PROGR TECTED ERROR 
14471 057220 $PER2S ;CALL=PERR25 TRAP +51( 104451) PROGRAM DETECTED ERROR 


(TEE Ve Se —_-— — 
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TRAP TABLE SEQ 0385 
14472 0S7222 050272 $PER26 ;CALL=PERR26 TRAP +52( 104452) PROGRAM DETECTED ERROR 
14473 057224 0503512 $PER27 ;CALL=PERR27 TRAP +53( 104453) TE ERROR 
14474 057 045112 $PER3SO ;CALL=PERRSO TRAP +54( 104454) ERROR 
o 050502 $PERS1 ;CALL=PERRS1 TRAP +55( 104455) ERROR 
7232 050600 32. fl; Le RAP es ERRUR 
14477 057234 050646 $PER3S3S ;CALL=PERRSS TRAP +57( 104457 ERROe 
14476 057236 050726 34. =6;CALL=PERRS4 T ERROR 
057240 7 $PER3S ;CALL=PERRSS Lay $4 seeeass ERROR 
051014 36 ;CALL=PERRS6 TR ERR GH 
7 $PER37 ;CALL=PERR3S7 TRAP +63( 10463) ERROR ssILC;REV B 
3 40 ;CALL=PERR40 TRAP+ i ERROR s3ILC;REV B 
7 057070 SNOTRAP ;CALL=PERR41 TRAP +65( 104465 ) ERROR 
057070 $NOTRAP ;CALL=PERR42 TRAP +66( 104466 ERROR 
057970 SNOTRAP ;CALL=PERR435 TRAP +67( 104467) 
Is 

















sECCINIT L=ECCINI TRAP+ 72( 104472) INITIALIZE ALL MK1i1 a : 


(10447 SR 
TRAP +74( 104474) WRITE GENERATED CHECKBITS IN ALL CSR'S 
CHECKBITS IN 1 SELECTED CSR 


ON 1 SELECTED CSR? 
ANY CSR 


$sCBCSR_ ;CALL= 
$CBiCSR ; ;CALL=CBICSR 
=WASSBE 


TRAP +75( 104475) WRITE GENERATED 
$WASSBE ;CALL T 04476 
$WAS1SBE ; CALL =WAS1SBE 

*WASOBE 


) WAS THERE A SBE 


;CALL= 
SCLRICSR ; ;CALL =CLRiCSR 
$CHKDIS ;CALL=CHKDIS 
$CHK1DIS; CALL =CHK1DIS 
a ; CALL =ENASBE 
;CALL =ENAISBE 07( 104507 ENABLE TRAPS ON SBE 
;CALL*=TSTREAD TRAP 2110¢ 1045109TEST LOC (Ri) € TST A atte 
ALIO;CALL*INVALIO T 1(€104511)INVALIDATE BACKGROUND P 
CALL =ERRGEN . 12 3TeST ERROR ADDRESS 


O45135)ENABLE CHECK BIT REGISTER 
TRAP + 114¢ 10asis JENABLE 


CBREG ;CALL=CBREG 
Hebb ; CALL =SYNREG SYNDROME BIT REGISTER 





14512 057540 
148i 057342 057070 $NOTRAP 


} 

14485 057 

14487 057256 034456 ¢ECCDIS sCALL=ECCDIS TRAP+ 70( 104470) DISABLE ECC ON ALL CSR’S 
14488 057260 034472 sECCLOIS CALL “ECCIOIS TRAP>71(104471) DISABLE ECC ON 1 SELECTED CSR 
034520 SOC TMT CALL CEGCLINIT TRAP*78( 104478) INITIALIZE 1 SELECTED PK 

14516 177776 ST x 177776 :STATUS REGISTER 
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TABLE E POINTER SEQ 0386 
14519 SBTTL TABLE ERROR POINTER 
13551 ,eTHIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
14 THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBGR F 
1452 ‘SLOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN INE TABLE IS PERTINENT. 
14 NOT $ITEMB IS 0 THE ONLY PERTINENT DATA IS CERRPC). 
14 | sNOTE2: EACH Tien tN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOMS: 
14527 - EM +:POINTS TO THE ERROR MESSAGE 
14 i* OH ‘POINTS TO THE DATA HEADER 
14 — OT POINTS TO THE DATA 
14530 - OF tT POINTS TO THE DATA FORMAT 
14 
ite 057344 SERRTB: ;ERROR 1 
14 7344 062032 4 
14 7346 OH13 
14 7350 060370 OT13 
14537 057352 06075 OF 11 
14 ERROR 2 
14539 057354 061017 én2 
14 7356 063551 OHi 
14541 057 060214 OT1 
14542 057 060627 OF2 
3 061055 ne 
1t345 os7see 068631 OHS 
14546 05 060232 OT3 
14547 057372 060744 OFS 
14 ERROR 4 
14549 057374 061107 Ena 
Hee ferent Sle es 
14 7 060744 OF9 
3 7404 061155 is > 
ite Soraes Geaee es 
14 7412 06062 OF2 
14 SERROR 6 
14 7414 061232 EM6 
14 7416 5 OHS 
14561 057 OTS 
14562 057422 060627 OF2 
14 ERROR 7 
14564 057424 061257 EM7 
14 426 oesees OHS 
14 7430 060252 OTS 
14 7432 060627 OF2 
1ase0 057434 063243 ties «°° 
13e70 osrase 96a7es OH25 
14571 057440 060546 D125 
14572 057442 060627 OF2 


TABL 





14575 
14576 Lange 





1 057474 
peed 

7500 
057502 
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ERROR POINTER 
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SEQ 0387 


CVMJABO MSV11-J MEMORY DIAG. 
TABLE ERROR POINTER 





Bs 
7702 








27 


31 
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SEQ 0388 


—— 


| CVMJABO MSV11-J MEMORY DIAG. 
| TABLE ERROR POINTER 


7 


i 


tases 
i 
: 
i 
i363 
1a7og 


ae 
eee 


REEREEREEEEEEEREEE EERE 
HS BEES Sh aa di GH is 





EES hes Ques Coes eter sae CEM EB 1 BS 
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as 
a * 


OH16 
Ti7 
8 





37 


oi 


40 


le 
~ 


© 


as 
cad 


& 


- 
zenROR 
et 
LeRROR 
Al 
ene 
or? 
engon 
OH7 
pr? 
fat 
zeson 


2 ae et ee es tae 


Page 450 


SEQ 0369 


CVMJABO MSV1 “3 MEMORY DIAG. MACRO YOS.02 Monday 07-Oct-85 16:57 Page 452 





|TABLE € POINTER SEQ 0390 
| 14 ;ERROR 47 
' 14732 060024 063040 —EM40 
14733 060026 063606 DH2 
| 14734 0600350 060466 DT20 
| 14735 060032 060627 DF2 
147 ;ERROR 
14737 060034 0633135 EMS6 
38 060036 065040 DH27 
14739 060040 060566 DT27 
14740 060042 060626 DF i 
1474 sERROR 51 
14742 060044 063455 EM61 
+5708 060046 064715 one 
14745 porate 060772 DF14 
127a8 ;ERROR 52 
14747 060054 062277 EM29 
14746 060056 064242 DHi3 
14749 060060 060370 DT13 
14750 060062 C60751 DF 11 
14 ERROR 53 
14752 060064 06211 
14753 060066 065114 DH30 
14754 060070 OT30 
14755 060072 061010 DF 16 
147 ;ERROR 54 
14757 060074 3345 EMS7 
14758 060076 065114 
14759 060100 DT30 
14760 0601 061010 DF16 
4 ;ERROR 55 
14 0601 061643 EM20 
14763 060106 064715 DH24 
14764 06011 DT24 
14765 060112 060772 DF14 
47 = 56 
14767 060114 pot 
14768 060116 065114 DH30 
14769 060120 DT30 
14770 060122 061010 DF 16 
14771 3E 57 
14772 060124 06157 —Em19 
1477 porte ts 0647 
14774 0601 DT24 
14775 060132 060772 OF 14 
14776 ;ERROR 60 
14777 060134 061365 EmMi3 
14778 060136 064557 
14779 060140 OT23 
14780 060142 060762 DF 13 
147 = 61 
147862 0601 06236 M30 
14763 060146 064557 DH20 
14784 060150 060 OT23 
14785 060152 060762 OF 13 
147866 ;ERROR 62 
14787 060154 061643 EM20 





A EE TT _ — 
———— 


CVMJABO MSV11-J MEMORY DIAG. 
TABLE ERROR POI 


14766 060156 
14789 060160 
14790 060162 
14791 

eet | 060164 
14793 060166 
14794 060170 
ees 060172 


14796 
14797 060174 
“ie 060176 
14799 060200 
4600 





NTER 


_ mm —- 
_— 
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ee = 


SEQ 0591 
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ERROR DATA TAGS (OT) SEQ 0392 


14807 .SBTTL ERROR DATA TAGS (DT) 
14808 060214 002020 002034 602044 DT1: "WORD ERRPC,ADDRESS,GCOD,BAD,0 
060222 002052 000000 
14809 060226 002020 000000 OT2: .WORD ERRPC,O 
14810 060232 pas bs 34 002036 002072 OTS: . WORD ERRPC ,PADDRESS ,PARCNT ,O 
14811 060242 002020 002034 002070 ODT4: .WORD ERRPC,ADDRESS,NEMCNT,O 
14812 060252 992020 177572 177574 OTS: _WORD ERRPC,MMRO,MMR1.MMR2,MMR3,CPUERR,O 
060260 177576 172516 177766 
060266 000000 
14813 060270 002020 002422 002400 DT6: _WORD ERRPC,APTPAR,LSIZE,APTECC.MSIZE,O 
76 002424 002402 000000 
14814 060 002920 002176 002034 ODT7: _WORD ERRPC, DUMMY, ADDRESS, DUMMY , GOOD .,BAD, BADXOR 
oeesss | 902060 
14615 902176 002176 002176 _WORD DUMMY, DUMMY, DUMMY , DUMMY, 0 
14816 060 002200 002204 DT10 _WORD DETRO.DETR1.DETR2,DETR3,DETR4,DETRS, DETSP, DETPSW,O 
oeeeae €02206 002210 002212 
060350 002214 002216 000000 
14817 060356 002020 002150 000000 O0T11 _WORD ERRPC,CSR,O 
14818 060364 002150 OT12 WORD .0 
14819 960370 902020 20 002176 002034 ODT1i3 "WORD ERRPC, DUMMY, ADDRESS, DUMMY, TSTDAT, TSTDAT+2, CHECK,CSR,O 
060404 002314 002150 
14820 060412 177746 177572 177574 ODT14 _WORD CONTRL.MMRO,MMR1,MMR2,MMR3,CPUERR,O 
060420 177576 172516 177766 
060426 000000 
14821 060430 002020 002176 002176 O0T16 _WORD ERRPC, DUMMY, DUMMY ,GO0D,GO0D2,G00D3 
060436 002044 002050 
14822 060444 002052 002056 .WORD ®BAD,BAD2,BAD3, DUMMY, DUMMY ,O 
060452 002176 002176 000000 
14823 060460 002020 002176 000000 D117: .WORD ERRPC,DUMMY,O 
060466 002020 002052 DT20: [WORD ERRPC.GOOD,BAD,O 
060474 000000 
14825 060476 002020 002176 000000 OT22: .WORD ERRPC.DUMMY, 
060504 002020 002176 002044 D0T23: .WORD ERRPC, DUMMY “GOOD .BAD. DUMMY , DUMMY , DUMMY , DUMMY , 0 
060512 002052 002176 002176 
060520 002176 002176 
14827 002176 002150 DT24: .WORD ERRPC,DUMMY,CSR.DUMMY,DUMMY,DUMMY,DUMMY.O 
060534 002176 002176 002176 
060542 002176 000000 
14828 060546 002044 002150 DT25: .WORD ERRPC,GOOD,CSR,CSRNO,O 
060554 002152 000000 
14829 060560 002052 DT26 .WORD ERRPC,BAD,O 
148 002176 034 0127 "WORD ERRPC.DUMMY, ADDRESS, DUMMY , DUMMY , DUMMY , DUMMY , O 
060574 002176 002176 02176 
060602 002176 
14831 060606 002176 002176 DT30: .WORD ERRPC,DUMMY,DUMMY,GOOD,BAD,CSR,DUMMY,O 
060614 00 002052 0021 
060622 002176 


CVMJABO MSV11-J ME 
ERROR DATA FORMATS 


14834 
14835 
14836 
14637 
14838 
14839 


14640 


ey 


88388833 


o 
~ 
o 


8 
Sit stti ett t ttt 


002 
900 


DIAG. 


°o 
~ 
~ 


Spit thi spt tht 


005 


8 888 888888 


S8 3&8 35 


oo 3 
a 
“oO 


011 


$3 88 88888 = 


So 
32 


= Se 


DFS: 


DF6: 


.BYTE 


.BYTE 


.BYTE 


.BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 


-BYTE 
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SEQ@ 0393 
ERROR DATA FORMATS (DF) 
0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 


0.5.0.8. .0.0,0,3,6.2.4 


0.5,0,8.,0,8.,8.,5,6.2.4 


—_—— <—— 


0,5,0,8.,9..9..9..3.6.2,4 


0,5,0,8..9..8.,8.,35,6,2,.4 


0.5,8.,.0,0,9.,0,0,9.,2,4 
0.5 

0,1.1.1.1 
0,5,0,8.,0,0,0,0,0 


0,5.0,0,3.6.2.4 
0,5,0,3.,6.2.4 
0.5.0.8..35.6.4 


0.5.8. .0,.0,3,4 
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ERROR MESSAGES (EM) SEQ 0394 
14851 .SBTTL ERROR MESSAGES (EM) 
14857 061017 103 101 116 EM2: “ASCIZ /CAN’T SET 22 BIT MODE IN MMR3/ 
0610 047 124 040 
061 123 105 124 
0610 062 
061033 102 111 
061036 124 040 115 
061041 117 104 105 
| 1044 040 111 116 
| Seioss «= st2sti«S «(OD 
14858 061055 120 101 122 €M3: .ASCIZ /PARITY ERROR(S) IN BANK 0/ 
061060 111 124 131 
061063 940 1 122 
1066 122 117 122 
061071 050 123 051 
061074 040 111 116 
061077 040 102 101 
1102 116 113 
061105 060 000 
14859 061107 116 117 116 EM4: .ASCIZ /NON-EXISTANT MEMORY (HOLES) IN BANK 0/ 
061112 055 105 130 
061115 111 123 124 
061 101 116 124 
061123 040 115 105 
1 115 117 122 
061131 131 
1134 110 117 114 
061137 105 123 051 
061142 040 111 116 
061145 040 101 
061150 116 113 
061153 060 000 
14860 061155 111 114 114 EMS: .ASCIZ /ILLEGAL OP RESERVED INSTRUCTION (TRAP TO 10)/ 
061160 105 107 101 
061163 114 117 
1166 122 122 
061171 105 123 1 
061174 122 126 105 
061177 104 040 111 
116 123 
1 122 125 103 
061210 124 111 117 
1213 116 
061216 124 122 101 
061221 120 124 
1224 117 061 
061227 060 051 000 
14861 061232 125 116 105 M6: .ASCIZ /UNEXPECTED TRAP TO 4/ 
061235 1 120 105 
1240 103 124 105 
061243 040 124 
1246 122 101 20 
061251 124 117 
040 064 000 
14862 061257 115 105 115 EM7: .ASCIZ /MEMORY MANAGEMENT (TRAP TO 250)/ 


CVMJABO MSV11-J MEMORY DIAG. 


ERROR MES S CEM) 
061265 040 
061270 116 
See it 
sit Us 
061304 101 
061307 124 

1338 062 

06131 051 

14863 061317 115 
061 117 

061 040 

0613 124 
061333 105 
061336 117 

14864 061341 104 
061344 101 
061347 105 

1352 105 

061355 117 

1360 104 

061363 120 
14865 061365 115 
061370 1235 
061575 107 
061376 130 
061401 103 

1404 104 

061407 102 

1412 106 

061415 107 
14866 061417 127 
061422 124 
061425 102 

1430 105 

061433 101 
061436 105 
061441 124 

1444 103 

061447 101 

1452 123 

061455 040 
061460 101 
14867 0614635 106 
061466 114 
061471 040 
061474 040 
061477 124 

ies us 
061510 120 
061513 127 
061516 110 
061521 102 

1524 106 

061527 107 
14868 061531 115 


101 
107 
05 


115 


EM11: 


EMle: 


EM1i3: 


EM14: 


EM15: 


EM17: 


.ASCIZ 


.ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 
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/MEMORY DATA ERROR/ 


/DETAILED ERROR DUMP/ 


/MISSING EXPECTED SBE FLAG/ 


/WRITE BYTE FAILED TO CLEAR SBE FLAG/ 


/FAILED TO GET INTERRUPT WITH DBE FLAG/ 


/MEMORY DATA ERROR IN CHECK BITS/ 





SEQ 0395 


— ee eee - ~ 


VMJABO MSV11-J MEMORY DIAG. 
ERROR MESSAGES CER) 
| 061534 117 122 
et prt 040 104 
061 124 101 
pote te 105 122 
061550 117 122 
061553 111 116 
061556 103 110 
061561 103 113 
1564 102 111 
1567 123 000 
14869 061571 123 102 
061574 055 104 
061577 105 040 
1 101 125 
1 105 104 
061610 120 101 
0616135 111 124 
061616 040 124 
1621 101 120 
1624 127 110 
061627 116 040 
0€16 116 110 
061635 102 111 
1640 195 104 
44670 061645 123 102 
1646 055 104 
061651 105 040 
1654 111 104 
061657 116 117 
1 040 103 
06166 125 123 
061670 040 120 
061673 122 111 
061676 131 040 
061701 122 101 
061704 040 127 
061707 105 116 
06171 105 116 
06171 102 114 
061720 104 000 
148671 061722 123 102 
1725 055 104 
061730 105 040 
061733 116 040 
0617 101 123 
061741 105 122 
061744 124 105 
061747 124 040 
061752 117 122 
061755 000 
14872 061756 115 111 
061761 123 111 
061764 107 040 
061767 130 120 
06177 103 124 
06177 104 040 
102 105 
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EM19: 


EM20: 


EM21: 


EM22: 


.ASCIZ /SBE-DBE CAUSED PARITY TRAP WHEN INHIBITED/ 


.ASCIZ /SBE-DBE DID NOT CAUSE PARITY TRAP WHEN ENABLED/ 


-ASCIZ /SBE-DBE ON MASTER TEST WORD/ 


-ASCIZ /MISSING EXPECTED DBE/ 


SEQ 0396 


CVMJABO MSV11-J MEMORY DIAG. 


ERROR MESSAGES (EM 


14873 0620035 
062006 


Se ee ee oe 


148674 


sue 


148676 136 


14877 oases 
15 





) 


116 
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EmM2S: 


EM27: 


-ASCIZ /UNEXPECTED PARITY TRAP/ 


.ASCIZ /RECEIVED DBE FLAG WHEN EXPECTING ONLY SBE FLAG/ 


-ASCIZ /CHECK BIT DATA ERROR/ 


-ASCIZ /ADDRESS PARITY ERROR DID NOT CAUSE ABORT/ 


-ASCIZ /ECC INHIBIT MODE POINTER FAILURE - DID NOT PROTECT BANK/ 


SEQ 0397 
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ERROR ME S CEM) SEQ 0398 


062255 111 104 040 
osge* 116 117 124 
261 040 120 +2 


103 124 

06227 102 101 116 

0622 113 000 

14876 77 es a3 ice EM29: .ASCIZ /CORRECTION FAILURE WITH ECC ENABLED ON FORCED SBE/ 

124 111 117 

062310 116 040 106 

062315 193 111 114 

062316 1 122 105 

062321 940 127 111 


062 105 103 103 
per tie 105 116 
06233 101 102 114 
340 1 
062345 117 116 
346 117 122 
062351 103 104 
062354 123 102 
14879 oe23e1 137 22 111 EMSO ASCII /WRITE BYTE WITH ECC ENABLED FAILED T 
: . L O CLEAR DATA AT/<CRLF> 
062364 124 105 040 
062367 183 131 
062372 1 040 127 
111 124 110 


062411 114 104 
14 101 
062417 111 114 105 
04 124 
117 103 
0624 114 105 101 
062433 122 1 
062436 101 101 
062441 101 1 
062444 200 
14880 062445 106 117 122 -ASCIZ /FORCED SBE LOCATION/ 
062450 103 105 104 
062453 040 123 
062456 105 40 114 
062461 117 103 101 
a Veo 
14861 Le +33 117 ise EMS2: .ASCIZ /MOVB #360,(R2)+ WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/ 
062477 063 066 060 
062502 054 122 
062505 062 0S1 
062510 040 111 
062513 124 110 
062516 105 103 103 


_ 


———— ..- - 


C 
E 


VMJABO -J MEMORY DIAG. 
RROR MESSAGES CEM) 
062521 105 
062524 10 102 
7 1 104 
103 110 
06253 116 107 
062540 104 040 
peo 101 124 
101 
1 040 106 
122 103 
7 104 040 
Sen it if 
114 117 
OSes 101 124 
73 117 116 
14882 062576 115 117 
062601 040 043 
062604 067 067 
062607 060 060 
oeeete 050 122 
1 051 040 
062620 111 124 
062625 040 105 
103 040 
1 116 101 
oases 114 105 
7 040 103 
062642 101 116 
062645 105 104 
062650 104 101 
062653 101 040 
062656 124 040 
062661 117 122 
062664 105 104 
pep es U 104 102 
oases 040 114 
ones 103 101 
00 111 117 
703 000 
14863 062704 125 116 
062707 130 120 
062 103 124 
06271 104 040 
062720 117 122 
062723 105 103 
Le 111 117 
1 040 127 
062734 124 116 
062737 105 103 
0627 040 104 
06274 123 101 
062750 114 105 
062753 117 116 
062756 106 117 
062761 103 105 
062764 040 123 
062767 105 000 
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116 
114 


EM33: 


EMSS: 


SEQ 0399 


.ASCIZ /MOV #177400,(R1) WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/ 


.ASCIZ /UNEXPECTED CORRECTION WITH ECC DISABLE ON FORCED SBE/ 


—_————— ee 


CVMJABO MSV11-J MEMORY DIAG. 


ERROR MESSAGES (EM) 


14885 


14686 


14687 


: 
Fee pe et pe fet ph fet eb et ft et fe 
NEE R SSS TOR UGUS SS UBUD 


06311 


SESSSSSEEESESES. 


FERS 
SEN 
~ 


101 
040 


MACRO YOS.02 Monday 07-Oct-85 16:57 Page 457-6 


-ASCIZ /APT SIZE DISAGREES WITH PROGRAM SIZING/ 


.ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 


/BRANCH GOBBLE FAILED CONDITION CODES TEST/ 


/BAD ERROR ADDRESS GENERATED/ 


/FLAGS NOT SET ON FORCED UNCORRECTED SBE/ 


/BIT SET ERROR IN CSR/ 


SEQ 0400 


—— = 


 CVMJABO MSV11-J anneny DIAG. 


148689 


14890 


14891 


14892 


“oer w aap tare uno Naraw 





tt: 
rs ; 


14893 ¢ 


vad, 
Nor 


+. 
4 
ai 


tr? 


+t 


14894 ¢ 


963474 
14895 063476 
063501 


MESSAGES ( 


123 
102 


105 
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000 
124 
114 


EMSS: 


EMS7: 


.ASCIZ 


-ASCIZ 


. ASCIZ 


-ASCIZ 


.ASCIZ 


. ASCIZ 


-ASCIZ 


/BIT CLEAR ERROR IN CSR/ 


/ILLECAL CSR TYPE/ 


/BAD PARITY TRAP GENERATED/ 


/WRONG CHECK BIT READ BACK FROM MEMORY/ 


/WRONG SYNDROME BITS READ INTO CSR/ 


/CSR UPDATE ERROR/ 


/PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/ 


SEQ 0401 
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| ERROR MESSAGES: CEM) oo 


> 1235 117 i22 
SC 040 116 117 
> 124 040 123 
be 125 120 120 
S2¢ 117 122 124 
s 105 104 040 
3S, 102 131 040 
b>. 110 111 
S! 3 040 Ltn 
5S: 111 10 107 
>. 116 11 i2 





HEADERS (DH) 
Vv ADD GOO0D 


eee a — — 


BAD/ 
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ERROR DATA HEADERS (OH) 
14898 .SBTTL ERROR DATA 
14899 063551 040 040 120 OH1: -ASCIZ / PC OE 
3554 103 040 040 
063557 040 104 1 
a8 126 040 101 
06356 104 104 
063570 040 107 


| 
| 063601 040 102 101 
14900 063606 040 040 120 OHe: .ASCIZ / PC 
| 063611 103 040 040 
063614 107 1 
063617 055 103 103 
06 055 103 103 
0636 000 
14901 063651 040 040 120 DHS: -ASCIZ / PC 
063634 103 040 040 
063637 0 061 123 
3642 124 040 101 
063645 104 104 040 
3650 040 043 040 
063653 117 1 040 
3656 105 122 122 
063661 117 122 123 
063664 000 
14902 063665 040 040 120 OHS: -ASCIZ / PC 
063670 103 040 040 
063673 040 040 
063676 115 115 122 
063701 060 
3704 040 115 
063707 115 122 
712 040 
663715 040 115 115 
063720 122 062 
063723 040 040 
3726 115 115 122 
063731 06 040 
3734 103 120 
063737 125 1 122 
063742 122 000 
14903 063744 040 040 120 OH6: .ASCIZ / PC 
| 


GO-CC B0-CC/ 


1ST ADD @ OF ERRORS/ 


MMRO 


APTPAR 


MMR1 MMR2 MMRS 


LSIZE APTECC MSIZE/ 


CPUERR/ 


SEQ 0405 


CYPIABO NEVADA eRe PBT MACRO YOS.02 Monday 07-Oct-85 16:57 Page 459-1 ene 000s 
040 


14904 064011 040 120 DH7: .ASCII / PC BANK VADD PADD GOOD/ 
064014 103 040 040 


040 126 
0640 101 104 104 
d64036 040 

040 040 120 

064041 101 104 104 

064044 040 040 040 

064047 040 040 107 

| 064052 117 117 104 
| 14905 064055 040 040 can -ASCIZ / BAD XxOR CSR MTYP INT PAT/ 

064065 101 104 040 

040 040 


064074 122 040 
064077 103 123 122 
064102 040 040 115 
064105 124 131 120 
064110 040 111 116 
064115 124 040 120 
064116 101 124 000 
14906 064121 040 040 122 OH10: -ASCIZ / RO Ri R2 R3 R4 RS SP PSW/ 
064124 060 040 040 
064127 040 040 040 
064132 040 122 061 
064135 040 040 
064140 040 040 
064143 122 062 040 
064146 040 040 040 
064151 040 G40 122 
0641 063 040 040 
064157 040 040 040 
0641 040 122 064 
06416 040 040 040 
064170 040 040 040 
064173 122 065 040 
064176 040 040 040 
064201 040 040 123 
064204 120 040 040 
064207 040 040 040 
064212 040 120 123 
064215 127 000 
14907 064217 040 040 120 DH11: -ASCIZ / PC CSR/ 
ceness 103 040 040 
040 040 

230 040 103 1235 

064235 122 


14908 pert tod 040 jo 123. OHi12: -ASCIZ / CSR/ 
14909 064242 040 por 120 DH13: -ASCII / PC BANK VADD PADD WROTE1 WROTE2/ 





-_ 


— 
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ERROR DATA HEADERS (DH) SEQ 0405 
064261 101 104 104 
040 040 040 

064267 040 040 120 
064272 101 104 104 
064275 040 
064 040 127 122 
064303 117 124 105 
064 061 04 

| 064311 127 122 117 

| 064314 124 105 062 

14910 064317 040 103 110 .ASCIZ / CHKBITS CSR/ 
064 113 102 111 
064 124 123 
0643 940 040 
064333 103 123 122 
064336 000 
14911 064537 103 117 116 DH14: .ASCIZ /CONTRL #£=MMRO MMR 1 MMR2 MMRS CPUERR/ 

064342 124 122 114 
064345 040 
0643 115 115 122 
064353 040 
0643 040 


14912 064416 040 040 120 OH15: -ASCII / PC BANK PADD GD-WD1 GD-WD2 GD-CHK/ 
064421 103 040 040 
064424 040 
064427 101 116 113 
0644 040 
064435 040 120 101 
064440 104 104 
064443 040 040 107 
064446 104 055 127 
064451 104 061 04 
34 040 107 104 
064457 0s5 127 104 
06446 107 1 oss 
064470 103 110 113 
14913 064473 040 102 101 -ASCIZ / BAD-WD1 BAD-WO2 BAD-CHK INT PAT/ 
064476 104 055 127 
064501 104 061 
504 102 101 104 
507 055 127 104 
064512 040 


LL LLL LL LL LL 
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ERROR DATA HEADERS (DH) 


064531 120 101 124 
064534 000 
14914 064555 040 040 120 
064 103 040 040 
064543 040 040 102 
| 064546 101 116 113 
064551 900 
14915 064552 040 040 120 
064555 103 000 
14916 064557 040 040 120 
064 103 040 040 
064565 040 040 102 
064570 101 116 113 
064573 940 107 104 
064576 055 103 123 
064601 122 040 
064604 050 103 123 
064607 122 051 
064612 040 103 123 
064615 122 040 
064620 115 124 131 
064625 1 040 111 
064626 116 124 
064631 120 101 
064634 124 000 


14917 064636 040 040 120 
040 


064652 107 1 
064655 055 105 122 
122 i 
064665 101 04 0S5 
105 122 122 
064671 040 103 123 
064674 122 0 
064677 115 124 131 
poh 120 111 
0647 116 124 
064710 040 101 
064713 124 000 
14918 064715 040 040 120 
064720 103 040 040 
064723 040 040 102 
064726 101 116 113 
064731 040 040 
064734 103 123 122 
064737 051 040 103 
064742 123 122 
064745 oat 115 124 
064753 113 116 124 
040 1 


14919 064764 040 040 120 
040 040 


DH16: 


DH1i9: 


DH24: 


-ASCIZ / PC 


-ASCIZ / PC/ 
-ASCIZ / PC 


-ASCIZ / PC 


-ASCIZ / PC 


-ASCIZ / PC 


BANK / 


BANK GD-CSR (CSR) CSR MTYP INT PAT/ 


BANK GD-ERR BAD-ERR CSR MTYP INT PAT/ 


BANK (CSR) CSR MTYP INT PAT/ 


GO-DAT (CSR) CSRNO/ 


SEQ 0406 


ee rn 


CVMJABO ev MEMORY DIAG. 


ERROR DATA HEADERS (DH) 
064775 104 
065000 101 
065003 040 

| 065006 = 123 
: 065011 040 
| 065014 103 
065017 («116 

14920 06502 040 
0650 103 

06 102 
065033 103 
065036 = 105 

14921 06 040 
065043 = 103 
065046 040 
065051 101 

06 040 
sees 
06506 040 
065070 = 101 
065073 040 

5076 = «103 

065101 040 

5104 (124 

065107 040 
065112 124 

14922 065114 040 
065117 103 
065122 040 

5125 101 

065130 040 
065133 120 

51 104 

065141 040 
5144122 

065147 105 

51 040 

06515 105 

51 040 

065163 123 

51 040 

065171 124 


oss 
124 
050 


122 


040 
123 
117 
040 
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104 


SEQ 0407 
DH26 : -ASCIZ / PC BADCODE/ 
DH27 : -ASCIZ / PC BANK VADD PADD CSR MTYP PAT/ | 
DH3O: -ASCIZ / PC BANK PADD WROTE READ CSR PAT/ 


Cynaae MSV1i1-J MEMORY DIAG. 
MESSAGES 


14925 
14926 065175 
065176 


14927 


14926 


5201 
sie 
i 
sie 
seat 


065237 
06 


SSSEESE53 
SEGSESSEEE 


S 
° 
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SSSS5SE555 


ro 
int ee 
Nu 


SSSSESSEEEE SEESSEEESEESES 


MSGOO1: 


MSGOO3: 


-ASCIZ 


: .ASCIZ 


SBTTL MESSAGES 
<CRLF >/ 


<CRLF >/ 


-ASCII <CRLF>/ 


-ASCIZ / 4 5 


MEMORY CONFIGURATION MAP/ 


16K WORD BANKS/ 


2 3/ 


SEQ 0408 
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MES s SEQ 0409 
14930 065437 200 040 040 MmSGOO4: .ASCII <CRLF>/ 012345670123456701234567/ 
065442 040 040 040 
pec aees 040 040 040 
50 060 061 062 
etre yt 063 064 065 
06 066 067 060 
stare 061 062 063 
06 064 065 066 
065467 067 060 061 
06547 062 063 064 
06547 065 066 067 
14931 pete et 060 061 062 -ASCIZ /012345670123456701234567012345670123/ 
065503 063 064 065 
: 66 067 060 
065511 061 062 063 
065514 064 065 066 
065517 067 060 661 
065 062 063 J64 
065 065 066 067 
oes 060 061 062 
065533 063 064 065 
065 066 067 060 
065541 061 062 063 
065 000 
14932 065545 200 105 122 MSGOOS: .ASCIZ <CRLF>/ERRORS / 
pert 122 117 122 
065553 123 
065556 000 
14933 oes 57 200 116 MSGOO6: .ASCIZ <CRLF>/UNDEFINED TRAP INSTRUCTION/<32> 
06 104 105 1 
06 111 116 105 
065570 104 i 
065573 i122 101 1 
065576 040 111 116 
065601 123 124 122 
065604 125 103 1 
5607 111 117 116 
065612 032 000 
14934 065614 200 115 105 MSGOO9: .ASCIZ <CRLF>/MEMTYPE / sMEMORY TYPE 
065617 115 124 131 
120 105 
14935 oe 200 120 i122 ™SGO010 ASCIZ CRLF >/PROTECT / MEMORY PROTECTED 
bs < > : Y E 
oesesi 117 124 105 
34 103 
7 000 
14936 040 040 040 MSGI1A: .ASCIZ / i 1 1 i i 1 1/ 
06 3 040 061 040 
040 040 040 
1 040 040 040 
06 061 040 
065657 040 040 040 
06 040 040 061 
06566 040 040 040 
065670 040 040 040 
065673 040 061 040 
065676 040 040 040 


CVMJABO MSV11-J MEMORY DIAG. 
AGES 


MESS 


14937 


— A Tm —_— - 


14939 
14940 
14941 





065701 
065704 
065707 


0 
ar eeT | 
066115 


SRSSSSRASSESERETE SES SSS TEASERS RSS SSERESSS SSSR ESSE ESSE ESS 


SSSREESE FESERALSSESRESTSSSSESSSSSSESESSSSSSESESES TEES 


$38 
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SPSSESERASSSESRRSSSSSSSESSESSSSRESESESSESEEES 


Sez 


S35 


MSGO11: 


MSGO12: 


SEQ 0410 


-ASCIZ / 0 1 2 3 4 5 6/ 


-ASCIZ 


4i/ 
47/ 
/01234567/ 


4%/ P 
44 3; SPACE é 
Pins SINGLE ASCII CHARACTERS € TERMINATOR 


/456701234567012345670123456701234567012345670123456701234567/ 
0,0 
<CRLF>/CSR 


——ae ee le 


ee tee | eee ae 


45 
14946 066146 
151 


54 
14947 066157 
14948 62 


SSSESEE53 


pet ee 
htm 
yvau 


33 


CVMJABO MSV11-J MEMORY DIAG. 
MESSAGES 
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MSGO17: 


MSGO18: 


MSGO19: . 
-ASCIZ 


MSGO20: 


MSGO21: 


-ASCIZ 


-ASCIZ 


ASCIZ 


.-ASCIT 


. ASCII 


-ASCIT 


.ASCIT 


.ASCIT 


.ASCIT 


-ASCII 


. ASCII 


/ 


4 4 
/ / 


;8 SPACES 


:2 SPACES 
33 SPACES 


<CRLF>/FS COMMAND MODE/ 


<CRLF>/COMMANDS AVAILABLE: / 


<CRLF>/0 


<CRLF>/1 


<CRLF>/2 


<CRLF>/3 


<CRLF>/4 


<CRLF>/5 


<CRLF > /6 


EXIT/ 


READ CSR/ 


LOAD CSR/ 


EXAMINE MEMORY/ 


MODIFY MEMORY/ 


SELECT BANK € TEST/ 


TYPE CONFIG MAP/ 


SEQ 0411 





066403 


14958 066416 


14959 ogeaas 


14960 


14961 


14962 0665 
14965 


14964 oseeiz 


Cc MSV11-J MEMORY OIAG. 
RE SSAGES 
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.-ASCIT 


.ASCIT 


-ASCIT 


.ASCIT 


-ASCITI 


-ASCIT 


-ASCIT 


.ASCIT 


<CRLF>/7 = SOB-A-LONG TEST/ 


<CRLF>/8 = ERROR SUMMARY/ 


<CRLF>/9= REFRESH TEST/ 


<CRLF>/10= SET FILL COUNT/ 


<CRLF>/11= ENTER KAMIKAZE MODE/ 


<CRLF>/12= EXIT KAMIKAZE MODE/ 


<CRLF>/13= TURN CACHE OFF/ 


<CRLF>/14= TURN CACHE ON/ 


SEQ 0412 


— —_ -—= 


cc a — 


| 
| 


14966 


14967 066704 


067 
14974 067057 
067 
06 
0670 
14975 067071 
067074 
067077 
0671 
0671 
14976 067106 


066646 
066651 
54 


103 
040 


a 
et) 
ou 


SSUbess 


CVMJABO MSV11-J MEMORY DIAG. 
MESSAGES 
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105 
116 
065 


124 


MSGO22: 


MSGO2S: 


MSGO26: 


MSGO027: 


MSGO28 : 


.ASCIT 


.ASCIT 


-ASCIT 


.ASCIT 


BYTE 
.ASCIZ 


.ASCIZ 


.ASCIZ 


.ASCIZ 


.ASCIZ 


.ASCIZ 


<CRLF>/15= TEST SELECTED BANKS/ 


<CRLF>/16= TEST ALL BANKS/ 


<CRLF>/17= ENABLE TRACE/ 


<CRLF>/18= DISABLE TRACE/ 


15,12,0 
<CRLF>/WHICH CSR(O-F)? / 


<CRLF>/CSR WORD? / 


<CRLF>/CSR DOES NOT EXIST/ 


<CRLF > /COMMAND : / 


<CRLF>/OLD CSR WAS/ 


<CRLF>/CSR IS NOW/ 


SEQ 0415 


ee - - -- 


CVMJABO MSV11-J MEMORY DIAG. MACRO YOS.02 Monday 07-Oct-85 16:57 Page 461-6 


| MESSAGES SEQ 0414 
ei ee 
oe7117 ii? 127 $00 
14977 067 200 1 130 MSGO29: .ASCIZ <CRLF>/EXAMINE MEMORY/ 
067 +93 115 111 
067 11 105 040 | 
0671 115 105 115 
0671 117 122 131 
06714 000 
14976 0671 200 102 101 MSGO30: .ASCIZ <CRLF>/BANK(O-177)7? / 
06714 116 113 050 
067 060 5 061 
067 067 067 051i 
os? 077 040 000 
14979 th e+} et 120 +10 MSGO31: .ASCIZ <CRLF>/PHYSICAL ADDRESS(0-17757776)? / 
067367 103 101 114 
040 101 104 
104 105 
123 is 050 
060 5 061 
067 067 065 
067 067 067 
oss 051 077 
200 120 101 MSGO32: .ASCIZ <CRLF>/PARITY ABORT/<32> 
oe 111 124 
131 040 101 
102 117 


000 
124 111 MSGO35: .ASCIZ <CRLF>/TIMEOUT TRAP/<32> 


- 
- 
w 
~ 
a 
~ 
~ 
| 


125 124 040 
124 Age 101 
120 000 
200 102 131 MSGA3S4: .ASCIZ <CRLF>/BYPASSING ECC TESTS ON BANK / 
120 101 123 
123 111 116 
107 040 105 
103 103 040 
124 105 123 
124 123 040 
117 116 040 
1 101 116 
11 040 000 
040 104 125 MSGB34: .ASCIZ / DUE TO SBE LOCATIONS/ 
105 040 124 
117 040 123 
102 105 040 
114 117 103 
10 124 111 
11 116 123 
121 126 MSGOSS: .ASCIZ /@V/ 
MSGO3S6: .ASCIZ <CRLF>/MODIFY MEMORY/ 


e3 
~ 
- 
vw 
~~ 
~ 
~~ 





= 
aw 
~~ 
~ 
w 








14986 067 


| 346987 


14966 


149869 


14990 


14991 


06 
14992 
06 


06 
14993 


14994 


CVMJABO MSV11-J MEMORY OIAG. 
MESSAGES 


105 
122 
200 


104 
101 


123 


ee ee 


117 
114 


MSGO37: 


MSGO3S8: 


MSGO39: 


MSGO40: 


MSGO42: 


MSGO43: 


MSGO46: 


MSG047: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


.ASCIZ 


: .ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 
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<CRLF>/OLD DATA WAS / 


<CRLF>/DATA IS NOW / 


<CRLF>/INPUT NEW DATA? / 


<CRLF>/SELECT BANK & TEST/ 


<CRLF>/BANK NOT ACCESSABLE/ 


<CRLF>/TESTCO-47)? / 


<CRLF>/TEST O DATA IS? / 


<CRLF>/TO ESCAPE TYPE ANY KEY/<CRLF><12><12> 


<CRLF>/TEST COMPLETE/ 





SEQ 0415 


CVMJABO MSV11-J MEMORY DIAG. 
MESSAGES 


14995 67627 
0676 
06763 
067640 


14996 067667 
06767 


14997 
149968 067188 


36 
14999 067741 
44 


15000 0677 


15001 070015 
0020 


15002 pd 4 9 fl 


0 
15003 070046 


116 
040 
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MSGO48: 


MSGO49: 


MSGOS1: 


MSGOSS: 


MSGOS6: 


MSGOSS : 


MSGO61: 


MSGO62: 


MSGO63: 


-ASCIZ 


.ASCIZ 


. EVEN 
-ASCIZ 
.ASCIZ 


-ASCIZ 


-ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 


/ NOT AVAILABLE NOW - TRY LATER!/ 


<CRLF>/BANK REQUIRES RELOCATION/ 


/POWER RECOVERY/ 


<CRLF >/SOB-A-LONG TEST/ 


<CRLF>/BELL = EACH PASS COMPLETE/ 


<CRLF>/ CSR CSR ...f 


42222227 


INPUT MUST BE A/ 


/N OCTAL / 


em eee ee 





SEQ 0416 


<<. eee =< = 


CVMJABO MSV11-.’ MEMORY DIAG. 
MESSAGES 


070071 103 

070074 114 

15005 070077 116 

070102 102 

070105 200 

| 15006 070107 040 

070112 103 

070115 19} 

070120 

15007 070121 200 

070124 122 
070127 le 

01 040 

07015 940 

0140 101 

0701435 122 

0146 116 

070151 106 

70154 040 

070157 104 

70162 103 
070165 111 

15008 070170 106 
070173 101 

070176 600 

15009 070177 113 

07 117 

07 123 

070210 106 

070213 105 

0702 122 


02 491 

070227 
15010 070230 200 
070233 106 
070236 123 
070241 124 
070244 124 

15011 070246 
070251 114 
070254 101 
070257 117 
070262 116 
70265 040 
070270 123 
070273 102 
070276 032 
15012 070300 200 
070303 102 
70306 113 
070311 105 
070314 117 


0 

15013 070321 
070 104 
070327 101 


-— ee oe 


123 


101 


MSGO64 : 


MSGO6S: 


MSGO67: 


MSGO70: 


MSGO73: 


MSGO75: 


MSGO76: 


MSGO77: 


.ASCIZ 


-ASCIZ 


: .ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 


.ASCIZ 


.ASCIZ 


.ASCIZ 


MACRO YOS.02 Monday 07-Oct-85 16:57 Page 461-9 


/NUMBER/<CRLF > 


/ DECIMAL / 


<CRLF>/ERRORS >» 20 - ABORTING FOR XXOP CHAIN/ 


/FATAL / 


/K WORDS OF MEMORY TOTAL/<CRLF > 


<CRLF>/REFRESH TEST/ 


<CRLF>/RELOCATION NOT POSSIBLE/<32> 


<CRLF>/ BANK ERRORS/<CRLF> 


<CRLF>/END PASS @/ 





SEQ 0417 


LLL LL 


°° o .—— —— se ee we nee 


CVMJABO MSV11i-J MEMORY DIAG. 
MESSAGES 
070332 040 043 
15014 070335 040 105 
070340 122 117 
070345 050 123 
070346 040 104 
070351 124 105 
070354 124 105 
070357 
15015 070361 106 
070364 114 114 
070367 103 117 
070372 116 124 
70375 117 103 
070400 101 114 
0704035 077 040 
15016 070406 200 115 


070414 114 040 
070417 124 101 
070422 113 000 

15017 070424 200 123 
070427 120 105 

32 126 111 


070443 103 113 
15018 070446 
070451 105 122 
070454 123 124 
070457 103 113 
15019 070462 040 111 
70465 040 1 
070470 120 124 
070473 000 
15020 070474 122 105 
070477 117 103 
07 124 105 
07050 040 040 
15021 070510 102 101 
070513 113 075 
15022 070516 040 040 
070521 105 123 
070524 075 000 
15023 oreant 200 105 
070531 124 105 
070534 111 116 
070537 040 113 
070542 115 111i 
070545 101 132 
070550 040 115 
070553 104 105 
15024 070556 200 114 
070561 101 126 
070564 116 107 
070567 113 101 
070S7¢ 111 113 
070575 132 105 
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Monday 07-Oct-85 16:57 Page 461-10 


MSGO79: .ASCIZ / ERROR(S) DETECTED/<CRLF> 


MSGO8S: 


MSGO89: 


MSGO90: 
MSGOS1: 
MSGO92: 


MSGO93: 
MSGO9S: 


MSG101: 


MSG102: 


-ASCIZ 


s .ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 
. ASCIZ 


.ASCIZ 


-ASCIZ 


<CRLF>/FILL COUNTCOCTAL)? / 


<CRLF>/KERNEL STACK/ 


<CRLF>/SUPERVISOR STACK/ 


<CRLF>/USER STACK/ 


4 IS EMPTY/ 


“RELOCATED / 


/BANK=/ 
4 TEST#=/ 


<CRLF>/ENTERING KAMIKAZE MODE/ 


<CRLF>/LEAVING KAMIKAZE MODE/ 


SEQ 0418 


ee ee ee ee - 


CvMJ MSV11-J MEMORY DIAG. 
HESSAGES 


15025 07 
| 0 


0 
15028 LA dh 6 


0 
15029 44 4 


07 
15031 071043 


117 
114 


eee ae Se 
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104 


MSG103: 


MSG104: 
MSG105: 


MSG106: 


MSG107: 


MSG110: 


MSG111: 


-ASCIZ <CRLF>/LEAVING FS MODE/<CRLF> 


BYTE 


‘ 32,0 sCONTROL Z 
-ASCIZ <CRLF>/ENTER BANKS - USE NUMBER 200 TO TERMINATE/ 


.ASCIZ <CRLF>/CACHE IS OFF/ 


-ASCIZ <CRLF>/CACHE IS ON CEXCEPT DURING ACTUAL PATTERNS)/ 


-ASCIZ <CRLF>/ONLY SELECTED BANKS WILL BE TESTED/ 


-ASCIZ <CRLF>/ALL BANKS WILL BE TESTED/ 


SEQ 0419 


ce ee ee ee 


Sr yy + matali MEMORY DIAG. 


15032 


SS ne 
a 


15033 


07 
15034 07 


15035 


15036 


0 
15037 
e] 


15038 
0 


15039 


0 
15040 071 


15041 
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MSG112: 


MSG113: 


M1184: 


MSG117: 


MSG119: 


MSG120: 


MSG121: 


MSGi22: 


MSGA122:. 


-ASCIZ 


-ASCIZ 


-ASCIZ 


.ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


.ASCII 


BYTE 
ASCIZ 


/K OF Q@-BUS PARITY MEMORY/<CRLF > 


/K OF ECC MEMORY/<CRLF > 


<CRLF >” 


<CRLF >” 


<CRLF >/ 


11/84" 


11/83” 


NO/ 


/ CACHE AVAILABLE/ 


/ CACHE BYPASSED/ 


<CRLF>/CSR NUMBER / 


0 
/ CONTROLS TOO MANY BANKS/ 


SEQ 0420 


ee ee eee 


CVMJABO MSV11-J MEMORY DIAG. 
_ MESSAGES 


15043 


15044 


15045 


15046 


15047 


15048 


071305 


071541 
071542 


102 
113 


124 


SRRSSEhSSEEE3 g2E5 


SEERSS 
NU Sh Ul 
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MSG125: 


MSG126: 


MSG127: 


MSG129: 


.ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 


: .ASCIZ 


-ASCIZ 


-ASCIZ 


/ PASSES COMPLETED/ 


<CRLF>/PROGRAM CSR COULD NOT BE DETERMINED/ 


<CRLF>/TRACE ENABLED/ 


<CRLF>/TRACE DISABLED/ 


<CRLF ><CRLE >/ CSR MAP/<CRLF> 


<CRLF>”* CVMJABO ECC/PARITY MEMORY DIAGNOSTIC” 


<CRLF ><CRLF > 


SEQ 0421 


—_— —- eee ee eer 
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MESSAGES SEQ 0422 


15049 oven 120 122 437 MSG1350; .ASCIZ /PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/ 


1550 103 105 
071333 123 117 12 
71 040 116 il 
071561 124 040 123 
71564 120 120 
1567 117 122 124 
071572 1 104 040 
71575 102 131 
71600 124 110 Lil 
071603 12 040 
071606 111 101 107 
1611 116 117 123 | 
071614 124 ili 103 | 
071617 000 
15050 071620 200 125 116 NOUBMT: .ASCIZ <CRLF>/UNIBUS MEMORY WILL NOT BE TESTED/<CRLF> 
071623 iii 102 
71626 123 115 
071631 105 115 117 
071634 122 131 040 
071637 127 iil 114 
071642 114 116 
071645 117 040 
71650 102 105 040 
071653 124 105 123 
071656 124 105 104 
071661 200 000 
15051 .EVEN 
15057 071664 $ SEND 
15058 071664 END: 
15059 071664 010414 .PRINT 60000-SUPLIMIT ;SUPERVISOR ADORESSES LEFT 
15063 000200 .END STARTS 





CVMJABO 
Sy=bo 


let 


- ABORT 

, ABORTC 
ABORTE 
ABORTF 
ABORTZ 


a 


ACFL 

ACTFLA 
ADORE S 
ANA2 

APTOOW 
APTECC 
APTFLA 





nD 


~4 
-4 > 





052220 
oS2252 
052316 
002144 
oS2 

002116 
002350 


002034 
007460 
040626 


—_— eo 


MSV11-J MEMORY DIAG. 
at ‘e 





oes EeeeS  oeksenes- 


@ 
Vv. 
~~ 






Seb). 
~“ i] 








A stao 









& 
“oO ww 





aan 


FA REA 


we 
s 8 


e 


Seescesadada, 


ae 


89 
se 
Hz 








CPUERR= 






ae hs 





kh 
Vi & in 


> 


SPEEIITTITEY 
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177766 
000015 
000200 
002150 
172100 
006112 
016672 
002232 
002225 





SEQ 0423 
064242 





ee 
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| Symbol teble SEQ 0424 
EO 004766 E63 035244 HEADER 002612 LOADBA 002432 
EM15 Ei 006064 E64 036510 HIPAT 040416 LOADCS= 104425 
EMI E10 012434 036470 HOLDLO= 000015 
E100 ©: 046010 036724 HT = 000011 002576 
| EM20 Eio2 49 012850 TeSAVE 032360 002400 
| EM21 E103 = 053640 04 III = 177777 000000 ) 
EM22 E104 48=—_- 053724 0437 TLL 013012 000060 | 
EM23 E105 000056 | 
EM24 Ei06 = © 054104 044472 004750 
EM2S Ell 013140 044472 005012 | 
EM26 Ei2 O1 044546 005310 
EM27 E13 013236 045330 ° 
EM29 E14 014146 04 012426 
EMS E15 015516 177640 013130 
ENSO E16 1 002064 013124 
EMS2 E17 0 944272 013130 
EMSS E2 044 
EMSS E20 0162 044342 013274 
EN36 E21 0162 044362 013440 
EMe E22 016162 044404 005316 
EM40 E23 021672 
EMS E24 i 044 
EMSO E25 044 013674 
EMS1 E26 044564 O1 
EMS2 E27 0222 040762 01 
EMSS ES 006276 014132 
EMSS E30 007302 014244 
EMS6 E31 014352 
EmMS7 E32 026270 16 
EM6 ESS 027052 014502 
EM6O E34 027036 1 014632 
EM61 ESS 041160 14762 
EM62 E36 027022 041262 015134 
EN7 E37 027076 041372 015264 
ENASBE E4 006710 041540 015436 
ENALSB E40 027 042014 015516 
END E41 027 015554 
ENDADO E42 030156 O4 
ENDFLG E43 030144 Sr ° 
ENERGI 44 0 os 0162 
ENEXBK E45 030710 044000 016174 
EQFLAG 031106 002442 1 
ERRADD £47 031430 043034 016514 
ERRGEN= 0067 002306 1 
ERRMAX ESO 0314 041046 016762 
ERROR = E51 031376 017010 
ERRPC ES2 031614 
ERRPSW E53 0321 000076 017014 
ERRSP E54 032070 032562 017016 
ERRVEC= ESS 0 045160 01 
EVEN E56 034706 oe 017116 
EXBANK E57 034706 051336 017 
EXCHDS E6 011764 0171 
EXCMD4 E60 03 017272 
E E61 0 GO0D3 002050 017 
E62 035244 GTSWR = 104407 005676 





Se Se ee 


CVMJABO MSV11-/ MEMORY DIAG. 
Syabol teble 


L150 020256 L237 
L151 020266 L24 
LiS2 020266 L240 
L155 020360 L241 
L154 020370 L242 
L155 020370 L243 
ul 020724 L 
L157 020756 L245 
16 005676 L 
il 021022 L247 
L161 021642 Les 
L 021620 
L165 021 L251 
L1 021706 
es 022030 eee 
L167 022030 L257 
L17 006012 
L170 022214 L261 
Li71 022214 L 
Li7e2 022322 L263 
L173 022274 L 
L174 022352 
L175 
L176 3056 L27 
L177 023312 L271 
005120 L272 
L20 L275 
023332 L274 
L201 023432 L3 
023612 300 
L203 023620 L301 
023756 L303 
L205 023764 L304 
024144 L305 
L207 024152 L306 
L21 L307 
L210 pert L31 
L2ii 025572 L310 
L212 L311 
L213 025710 L315 
L215 L316 
L216 L317 
L217 026160 L32 
L220 0262 L320 
L221 L321 
Lees L322 
L L323 
L226 026540 L324 
L227 026652 325 
L230 
L231 026614 L327 
32 026632 L335 
L233 L330 
34 L331 
L235 027022 LS 
026722 L333 


ee ee mee - 
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026734 L334 034426 L416 043712 
L335 034664 L417 
7 L3 034664 L42 
026752 L337 024726 L420 044052 
7 006462 L421 044164 
027910 L340 034734 L422 0444 
L341 035030 L423 0444 
027010 L342 0350 L424 044722 
027122 L343 035072 L425 7 
035100 L4 044742 
006234 L345 035222 \427 044760 
L 036324 L43 
030112 L347 036 L4 
30130 L35 006516 L431 045110 
030134 L3 036352 L4 045154 
L351 036352 L433 
03041¢ L3 036454 L434 S 
L353 036504 L435 045766 
030456 L3 036626 L4 7 
L355 036626 L437 047306 
030610 L3 036626 La 
L357 036606 L440 050136 
L36 006522 L441 050150 
031070 036626 L442 0501 
L361 036670 L443 050170 
036670 050210 
031316 L363 036720 L445 
31334 040112 
1362 L365 040302 L447 05024 
142 040464 L45 006670 
031524 L367 040532 L450 
1566 37 006552 L451 050460 
031704 L370 040536 L4 
031710 L371 040544 L453 050514 
1762 L372 040560 L4 
031764 L373 040572 L455 050544 
0 2 L374 1004 L4 
006350 L375 041014 L457 050570 
032042 L376 041150 L460 050612 
L377 041210 L461 
032140 L4 160 462 050740 
0321 L40 576 L463 050 
032160 L400 041214 464 0507 
0063 L401 1244 L465 051072 
032160 L402 466 0511 
032276 L403 042444 L467 051172 
032 L404 042504 L470 05151 
032722 L405 L471 051514 
L406 042752 L472 0517 
033416 L407 042766 L473 051710 
L4 So L474 17 
033414 L410 04 L475 0517 
20 L411 043330 L476 051774 
033424 L4i2 043332 L477 0521 
50 L413 04 L 0052 
033552 L414 043756 LSO 006724 
20 L415 043742 L500 052036 


SEQ 0425 





MPT. 


MKTEST 


0157 
Orit 
016772 
177572 


177376 
12316 
34014 


SRLIARSAALE 
Ec eaen 


224 
ao 


§ 33 


ee 
net 


067 





MSG 
MSG 
MsG 
MSG 
MSG 
MSG 
MS 

MT 

MTE 


ze 
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MTPAOS 
MTPAO4 








PERR1S= 


pap 





yabo 


TRE 


5c p<c 
x = bcs 


Ste 
4 > 


} 


eF 
’ , 
+ 
: | 


nme 
"4-584 


~ . 


> ap 


mS 
t 





Vil-J MEMORY DIAG. 


RES 








SWAPAT 
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SUPSTK= 000740 
SVKPAR 0363506 


002636 
000176 
oss 





2 
i 
2 
= 





ee 


———- ~ 


SEQ 0427 


—— ~ ee eee 


hee MSVil-J MEMORY DIAG. 
yabol teble 


051410 


ae a 
7 





00262 $PASS 056724 

002624 $PASTM 057026 

. ABS. 071664 C(RW,1I,GBL,.ABS,OVR) 
000000 


000 
001 CRW, I,LCL,REL,CON) 
Errore detected: 0 


aee Assembler statistics 


Work file reeds: 1377 

Work file writes: 1005 

Size of work file: 27640 orde € 108 sh eeee) 
Size of core pool: 17990 Words ( 69 Pages) 
Operating system: RSX-11M/PLUS 


Elepsed time: 00:12:53.05 


$PATMA 
$PE 


CVMJAB.BIC,CVMJAB.LST/-SP/NL : TOC=CVMJAB/ML , CVMJAB. MAC 


rm 
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$PWRON 045260 


$PWRUP 045634 
$ QUE 57 


057076 


000000 
013710 
000000 
000000 


000502 
000510 
054351 


SEQ 0428 


eee ee ee ~- 


